ogc.php
10.3 KB
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
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
<?php
/*
Title: ogc.php
Gera web services nos padrões OGC baseado no menutemas.xml
About: Licença
I3Geo Interface Integrada de Ferramentas de Geoprocessamento para Internet
Direitos Autorais Reservados (c) 2006 Ministério do Meio Ambiente Brasil
Desenvolvedor: Edmar Moretti edmar.moretti@mma.gov.br
Este programa é software livre; você pode redistribuí-lo
e/ou modificá-lo sob os termos da Licença Pública Geral
GNU conforme publicada pela Free Software Foundation;
tanto a versão 2 da Licença.
Este programa é distribuído na expectativa de que seja útil,
porém, SEM NENHUMA GARANTIA; nem mesmo a garantia implícita
de COMERCIABILIDADE OU ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA.
Consulte a Licença Pública Geral do GNU para mais detalhes.
Você deve ter recebido uma cópia da Licença Pública Geral do
GNU junto com este programa; se não, escreva para a
Free Software Foundation, Inc., no endereço
59 Temple Street, Suite 330, Boston, MA 02111-1307 USA.
File: i3geo/ogc.php
19/6/2007
Include:
<ms_configura.php> <classesphp/pega_variaveis.php>
Parameters:
lista - se for igual a "temas", mostra uma lista dos temas disponíveis
ajuda - se for definida na URL, mostra uma ajuda ao usuário
tema - nome do tema do serviço. Se for definido, o web service conterá apenas o tema.
intervalo - valor inicial e final com o número de temas que serão mostrados no serviço
legenda - mostra a legenda no corpo do mapa sim|nao
perfil - perfil utilizado para escolher os menus
About: Exemplos
ogc.php?lista=temas
ogc.php?tema=bioma
ogc.php?intervalo=0,50
*/
error_reporting(0);
if (!function_exists('ms_GetVersion'))
{
if (strtoupper(substr(PHP_OS, 0, 3) == 'WIN'))
{
if(!@dl('php_mapscript_48.dll'))
dl('php_mapscript.dll');
}
else
{dl('php_mapscript.so');}
}
require_once("classesphp/carrega_ext.php");
include("ms_configura.php");
include("classesphp/pega_variaveis.php");
include("classesphp/classe_menutemas.php");
//
//pega os endereços para compor a url de chamada do gerador de web services
//ogc.php
//
$protocolo = explode("/",$_SERVER['SERVER_PROTOCOL']);
$protocolo = $protocolo[0];
$protocolo1 = strtolower($protocolo) . '://'.$_SERVER['SERVER_NAME'];
$protocolo = strtolower($protocolo) . '://'.$_SERVER['SERVER_NAME'] .":". $_SERVER['SERVER_PORT'];
$urli3geo = str_replace("/ogc.php","",$protocolo.$_SERVER["PHP_SELF"]);
//
//pega a lista de menus que será processada
//se a variável definida em ms_configura for = "", a busca é feita
//pelo método Menutemas
//
if(!isset($perfil)){$perfil = "";}
if($menutemas != "" || is_array($menutemas))
{
foreach($menutemas as $m)
{
$menus[] = $m["arquivo"];
}
}
else
{
$m = new Menutemas("",$perfil,$locsistemas,$locaplic,"",$urli3geo);
foreach($m->pegaListaDeMenus() as $menu)
{
$menus[] = $menu["url"];
}
}
if(!isset($menus))
$menus = array("menutemas/menutemas.xml");
//pega a lista de grupos
if ($lista == "temas")
{
echo '<html><head><title>WMS</title><meta name="description" content="OGC"><meta name="keywords" content="WMS OGC mapa sig gis webmapping geo geoprocessamento interativo meio ambiente MMA cartografia geografia"> <meta name="robots" content="index,follow">';
echo "<body><b>Lista de temas por grupos e subgrupos e endereços de acesso aos dados por meio de Web Services WMS (os códigos dos temas estão em vermelho)</b><br><br>";
$imprimir = "";
foreach ($menus as $menu)
{
$xml = simplexml_load_file($menu);
foreach($xml->GRUPO as $grupo)
{
$imprimegrupo = "<i>".mb_convert_encoding($grupo->GTIPO,"HTML-ENTITIES","auto")."</i>";
foreach($grupo->SGRUPO as $sgrupo)
{
$imprimesubgrupo = mb_convert_encoding($sgrupo->SDTIPO,"HTML-ENTITIES","auto");
foreach($sgrupo->TEMA as $tema)
{
if (mb_convert_encoding($tema->OGC,"HTML-ENTITIES","auto") == "")
{
$imprimir .= $imprimegrupo."->".$imprimesubgrupo."<br>";
$imprimir .= " ";
$id = mb_convert_encoding($tema->TID,"HTML-ENTITIES","auto");
$imprimir .= "<span style=color:red >".$id."</span>";
$imprimir .= " - ".mb_convert_encoding($tema->TNOME,"HTML-ENTITIES","auto")." ";
$imprimir .= " <a href='".$urli3geo."/ogc.php?tema=".$id."&service=wms&request=getcapabilities' >Getcapabilities</a>";
$imprimir .= " <a href='".$urli3geo."/ogc.php?tema=".$id."&SRS=EPSG:4291&WIDTH=500&HEIGHT=500&BBOX=-76.5125927,-39.3925675209,-29.5851853,9.49014852081&FORMAT=image/png&service=wms&version=1.1.0&request=getmap&layers=".$id."' >GetMap </a>";
if (mb_convert_encoding($tema->TLINK,"HTML-ENTITIES","auto") != "")
{$imprimir .= " <a href='".mb_convert_encoding($tema->TLINK,"HTML-ENTITIES","auto")."' >fonte</a>";}
$imprimir .= "<br>";
}
}
}
}
}
echo $imprimir."</body></html>";
return;
}
if (isset($ajuda))
{
echo "<pre><b>Construtor de web services do I3Geo.</b><br><br>";
echo "Esse utilitário usa o arquivo menutemas.xml para gerar web services no padrão OGC.";
echo "Para escolher um tema, utilize:<br>";
echo "ogc.php?lista=temas - para listar os temas disponíveis<br>";
echo "Para usar esse web service, além dos parâmetros normais, vc deverá incluir o parâmetro &tema=,<br>";
echo "ou seja,http://[host]/i3geo/ogc.php?tema=[código do tema obtido do menutemas.xml]<br><br>";
echo "Se não for desejado que um tema apareça na lista, é necessário incluir a tag <OGC>nao</OGC> no registro do tema no arquivo menutemas.xml.<br>";
echo "Utilize o parametro &intervalo=0,20 para definir o número de temas.";
return;
}
//
//cria o web service
//
include("classesphp/funcoes_gerais.php");
$req = ms_newowsrequestobj();
$tipo = "";
foreach ($_GET as $k=>$v)
{
$req->setParameter($k, $v);
if(strtolower($v) == "getcapabilities")
{$tipo = "metadados";}
if(strtolower($k) == "layers")
{$tema = $v;}
if(strtolower($k) == "layer")
{$tema = $v;}
//if(strtolower($k) == "srs")
//{$SRS = $v;}
}
if(count($_GET) == 0){
$tipo="intervalo";
$req->setParameter("REQUEST", "getCapabilities");
$req->setParameter("SERVICE", "WMS");
}
if(isset($tema) && $tipo != "metadados")
{$tipo = "";}
$req->setParameter("VeRsIoN","1.1.0");
$oMap = ms_newMapobj("aplicmap/ogcws.map");
//
//altera os caminhos das imagens
//
if((isset($legenda)) && ($legenda == "sim"))
{
$leg = $oMap->legend;
$leg->set("status",MS_EMBED);
}
$proto = "http" . ((isset($_SERVER['HTTPS']) && $_SERVER['HTTPS'] == "on") ? "s" : "") . "://";
$server = isset($_SERVER['HTTP_HOST']) ? $_SERVER['HTTP_HOST'] : $_SERVER['SERVER_NAME'];
$or = $proto.$server.$_SERVER['PHP_SELF'];
if((isset($tema)) && ($tema != "") && ($tipo=="metadados"))
{$or = $or."?tema=".$tema."&";}
$oMap->setmetadata("ows_onlineresource",$or);
$oMap->setmetadata("ows_title",$tituloInstituicao." - i3geo");
if (!isset($intervalo))
{$intervalo = "0,5000";}
else
{$tipo = "intervalo";}
if(!isset($tema)){
$intervalo = "0,5000";
$tipo = "intervalo";
}
if ($tipo == "" || $tipo == "metadados")
{
$tema = explode(" ",$tema);
foreach ($tema as $tx)
{
$nmap = ms_newMapobj("temas/".$tx.".map");
$ts = $nmap->getalllayernames();
foreach ($ts as $t)
{
$l = $nmap->getlayerbyname($t);
$l->setmetadata("ows_title",pegaNome($l));
$l->setmetadata("ows_srs","EPSG:4291 EPSG:4326");
//essa linha é necessária pq as vezes no mapfile não tem nenhum layer com o nome igual ao nome do mapfile
if(count($ts)==1)
{
$l->set("name",$tx);
}
$l->setmetadata("gml_include_items","all");
$l->set("dump",MS_TRUE);
$l->setmetadata("WMS_INCLUDE_ITEMS","all");
$l->setmetadata("WFS_INCLUDE_ITEMS","all");
if($l->type == MS_LAYER_RASTER)
{
$c = $l->getclass(0);
if ($c->name == "")
{$c->name = " ";}
}
if (isset($postgis_mapa))
{
if ($postgis_mapa != "")
{
if ($layer->connectiontype == MS_POSTGIS)
{
$lcon = $l->connection;
if (($lcon == " ") || ($lcon == "") || (in_array($lcon,array_keys($postgis_mapa))))
{
//
//o metadata CONEXAOORIGINAL guarda o valor original para posterior substituição
//
if(($lcon == " ") || ($lcon == ""))
{
$l->set("connection",$postgis_mapa);
$l->setmetadata("CONEXAOORIGINAL",$lcon);
}
else
{
$l->set("connection",$postgis_mapa[$lcon]);
$l->setmetadata("CONEXAOORIGINAL",$lcon);
}
}
}
}
}
autoClasses(&$l,$oMap);
ms_newLayerObj($oMap, $l);
}
}
}
else
{
$conta = 0;
$int = explode(",",$intervalo);
$codigosTema = array();
//var_dump($menus);exit;
foreach ($menus as $menu)
{
$xml = simplexml_load_file($menu);
foreach($xml->GRUPO as $grupo)
{
foreach($grupo->SGRUPO as $sgrupo)
{
foreach($sgrupo->TEMA as $tm)
{
if (mb_convert_encoding($tm->OGC,"HTML-ENTITIES","auto") == "")
{
$codigosTema[] = mb_convert_encoding($tm->TID,"HTML-ENTITIES","auto");
}
}
}
}
}
foreach($codigosTema as $codigoTema)
{
if(!file_exists("temas/".$codigoTema.".map")){break;}
if (@ms_newMapobj("temas/".$codigoTema.".map"))
{
$nmap = ms_newMapobj("temas/".$codigoTema.".map");
$ts = $nmap->getalllayernames();
if (count($ts) == 1)
{
foreach ($ts as $t)
{
if ($oMap->getlayerbyname($t) == "")
{
$conta++;
if (($conta >= $int[0]) && ($conta <= $int[1]))
{
$l = $nmap->getlayerbyname($t);
$l->setmetadata("ows_title",pegaNome($l));
$l->setmetadata("ows_srs","EPSG:4291 EPSG:4326");
$l->set("status",MS_OFF);
$l->setmetadata("gml_include_items","all");
$l->set("dump",MS_TRUE);
$l->setmetadata("WMS_INCLUDE_ITEMS","all");
$l->setmetadata("WFS_INCLUDE_ITEMS","all");
$l->setmetadata("ows_metadataurl_href",mb_convert_encoding($tm->TLINK,"HTML-ENTITIES","auto"));
$l->setmetadata("ows_metadataurl_type","TC211");
$l->setmetadata("ows_metadataurl_format","text/html");
ms_newLayerObj($oMap, $l);
}
}
}
}
}
}
}
ms_ioinstallstdouttobuffer();
$oMap->owsdispatch($req);
$contenttype = ms_iostripstdoutbuffercontenttype();
header("Content-type: $contenttype");
ms_iogetStdoutBufferBytes();
ms_ioresethandlers();
?>