webservices.php
3.77 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
<?php
/*
Title: Administração do cadastro de web services
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/admin/webservices.php
19/6/2007
*/
include_once("admin.php");
$cp = new cpaint();
//faz a busca da função que deve ser executada
switch ($funcao)
{
//verifica os editores
case "verificaEditores":
$cp->set_data(verificaEditores($editores));
$cp->return_data();
break;
case "pegaWS":
$cp->set_data(pegaDados('SELECT * from i3geoadmin_ws order by tipo_ws'));
$cp->return_data();
break;
case "alterarWS":
alterarWS();
if($id_ws == "")
$cp->set_data(pegaDados('SELECT * from i3geoadmin_ws'));
else
$cp->set_data(pegaDados('SELECT * from i3geoadmin_ws where id_ws = '.$id_ws));
$cp->return_data();
break;
case "excluir":
$cp->set_data(excluirWS());
$cp->return_data();
break;
case "importarXmlWS":
$cp->set_data(importarXmlWS());
$cp->return_data();
break;
}
/*
Function: alterarWS
Altera o registro de um WS
*/
function alterarWS()
{
global $id_ws,$desc,$nome,$link,$autor,$tipo;
try
{
require_once("conexao.php");
$nome = mb_convert_encoding($nome,"UTF-8","ISO-8859-1");
$desc = mb_convert_encoding($desc,"UTF-8","ISO-8859-1");
$autor = mb_convert_encoding($autor,"UTF-8","ISO-8859-1");
if($id_ws != "")
$dbhw->query("UPDATE i3geoadmin_ws SET desc_ws = '$desc',nome_ws = '$nome', link_ws = '$link', autor_ws = '$autor', tipo_ws = '$tipo' WHERE id_ws = $id_ws");
else
$dbhw->query("INSERT INTO i3geoadmin_ws (nome_ws,desc_ws,autor_ws,tipo_ws,link_ws) VALUES ('','','','','')");
$dbhw = null;
$dbh = null;
return "ok";
}
catch (PDOException $e)
{
return "Error!: " . $e->getMessage();
}
}
function excluirWS()
{
global $id;
try
{
include("conexao.php");
$dbhw->query("DELETE from i3geoadmin_ws WHERE id_ws = $id");
$dbhw = null;
$dbh = null;
return "ok";
}
catch (PDOException $e)
{
return "Error!: " . $e->getMessage();
}
}
function importarXmlWS()
{
global $xml,$tipo;
if(!file_exists($xml))
{return "<br><b>Arquivo $xml não encontrado";}
include_once("../../classesphp/funcoes_gerais.php");
include("conexao.php");
$xml = simplexml_load_file($xml);
//
//importa os grupos
//
$wsExistentes = array();
$q = $dbhw->query("select * from i3geoadmin_ws");
$resultado = $q->fetchAll();
foreach($resultado as $r)
{$wsExistentes[$r["nome_ws"]] = 0;}
foreach($xml->channel as $c)
{
foreach($c->item as $item)
{
$descricao = ixml($item,"description");
$nome = ixml($item,"title");
$autor = ixml($item,"author");
$link = ixml($item,"link");
if(!isset($wsExistentes[$nome]))
$dbhw->query("INSERT INTO i3geoadmin_ws (nome_ws,desc_ws,autor_ws,link_ws,tipo_ws) VALUES ('$nome','$desc','$autor','$link','$tipo')");
$wsExistentes[$nome] = 0;
}
}
$dbhw = null;
$dbh = null;
return "Dados importados.";
}
?>