1 <?php /* vim: set binary expandtab tabstop=4 shiftwidth=4 textwidth=80:
2 -------------------------------------------------------------------------------
3 Ministerio de EconomÃa
5 -------------------------------------------------------------------------------
6 This file is part of meconlib.
8 meconlib is free software; you can redistribute it and/or modify it under
9 the terms of the GNU General Public License as published by the Free
10 Software Foundation; either version 2 of the License, or (at your option)
13 meconlib is distributed in the hope that it will be useful, but WITHOUT
14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
15 FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License; if not,
18 write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
19 Boston, MA 02111-1307 USA
20 -------------------------------------------------------------------------------
21 Creado: Thu Aug 11 15:17:11 2003
22 Autor: Manuel Nazar <manazar@mecon.gov.ar>
23 -------------------------------------------------------------------------------
24 $Id: Usuario.php 242 2003-08-11 18:02:16Z manazar $
25 -----------------------------------------------------------------------------*/
26 require_once 'MECON/Agente.php';
28 require_once 'DB.php';
47 * @var string $nivelygrado
83 function ArmarconDNI($dni)
85 $sql = "SELECT login,nombre
88 $result = $this->_db->query($sql);
89 if (DB::isError($result)) {
90 trigger_error($result->getMessage(), E_USER_ERROR);
91 } elseif ($result->NumRows()>0) {
92 $row = $result->fetchRow(DB_FETCHMODE_ORDERED);
96 $this->nombre=$nombre;
99 trigger_error('El dni '.$dni.' no existe, debe loguearse al
100 menos una vez a la intranet.');
105 * @param string $login
110 function ArmarconLOGIN($login)
112 //$login = ereg_replace ("@", "\\\@", $login);
113 $sql = "SELECT dni,nombre
115 where login = '$login'";
117 $result = $this->_db->query($sql);
119 if (DB::isError($result)) {
120 trigger_error($result->getMessage(), E_USER_ERROR);
121 } elseif ($result->NumRows()>0) {
122 $row = $result->fetchRow(DB_FETCHMODE_ORDERED);
123 $this->dni = $row[0];
124 $this->nombre = $row[1];
125 $this->login = $login;
127 trigger_error('El usuario '.$login.' no existe, debe loguearse al
128 menos una vez a la intranet.');
138 function MECON_Usuario($db, $dni = null, $login = null)
141 if(! is_null($dni)) {
142 $this->ArmarconDNI($dni);
143 $this->buscarUsuarioDNI($dni);
145 if(! is_null($login)) {
146 $this->ArmarconLOGIN($login);
147 $this->buscarUsuarioDNI($this->getDni());
155 * @return lo que devuelve el query (DB_Result o DB_Error).
158 function Insertar_Usuario($dni, $login, $nombre)
160 $sql = "REPLACE INTO usuario.Usuario (login,dni,nombre)
161 values ('$login',$dni,'$nombre')";
162 return $this->_db->query($sql);
199 return $this->nombre;
206 function getNivelygrado()
208 return $this->nivelygrado;
228 function buscarUsuarioDNI($dni)
230 $MECON_Agente= & new MECON_Agente($dni);
232 $nombre = $MECON_Agente->getNombre();
233 $this->nombre = $nombre;
234 $codep= $MECON_Agente->getDependencia();
235 $this->codep = $codep;
236 $tipo= $MECON_Agente->getTipo();
238 $this->nivelygrado="";
239 if (isset($MECON_Agente->datos['nivel']))
241 $this->nivelygrado= $MECON_Agente->datos['nivel'].$MECON_Agente->datos['grado'];
247 * Verifica si el login pasado por parametro es valido
249 * @param string $login Login a verificar
254 function verificarLogin($login) {
255 $sql = "SELECT count(*) as cuenta FROM usuario.Usuario WHERE login = "
256 . $this->_db->quote($login) ;
257 $result = $this->_db->query($sql);
258 if (PEAR::isError($result)) {
261 $row = $result->fetchRow(DB_FETCHMODE_ASSOC);
262 if ($row['cuenta'] != 0) {
269 * Devuelve un array de logins con aquellos que cumplan con algun requisito
272 * @param DB &$db Base de Datos
273 * @param string $login Login a filtrar. (Puede ser completo o una parte de el)
274 * @param string $nombre Nombre a filtrar.
280 function filtrarUsuarios(&$db, $login, $nombre) {
281 if ($login && $nombre) {
282 return new PEAR_Error('Solo debe ingresarse una opcion de filtro,
283 login o nombre, a la vez.');
285 $sql = "SELECT u.login as login, u.nombre as nombre FROM usuario.Usuario as u
289 $sql.= ' u.login LIKE \'%'.$login.'%\'';
292 $sql.= ' u.nombre LIKE \'%'.$nombre.'%\'';
294 $sql.= 'ORDER BY u.login';
296 $db->setFetchMode(DB_FETCHMODE_ASSOC);
297 $result = $db->query($sql);