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();
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();
126 $this->nombre=$nombre;
129 trigger_error('El usuario '.$login.' no existe, debe loguearse al
130 menos una vez a la intranet.');
140 function MECON_Usuario($db, $dni = null, $login = null)
143 if(! is_null($dni)) {
144 $this->ArmarconDNI($dni);
145 $this->buscarUsuarioDNI($dni);
147 if(! is_null($login)) {
148 $this->ArmarconLOGIN($login);
149 $this->buscarUsuarioDNI($this->getDni());
157 * @return lo que devuelve el query (DB_Result o DB_Error).
160 function Insertar_Usuario($dni, $login, $nombre)
162 $sql = "REPLACE INTO usuario.Usuario (login,dni,nombre)
163 values ('$login',$dni,'$nombre')";
164 return $this->_db->query($sql);
201 return $this->nombre;
208 function getNivelygrado()
210 return $this->nivelygrado;
230 function buscarUsuarioDNI($dni)
232 $MECON_Agente= & new MECON_Agente($dni);
234 $nombre = $MECON_Agente->getNombre();
235 $this->nombre = $nombre;
236 $codep= $MECON_Agente->getDependencia();
237 $this->codep = $codep;
238 $tipo= $MECON_Agente->getTipo();
240 $this->nivelygrado="";
241 if (isset($MECON_Agente->datos['nivel']))
243 $this->nivelygrado= $MECON_Agente->datos['nivel'].$MECON_Agente->datos['grado'];
249 * Verifica si el login pasado por parametro es valido
251 * @param string $login Login a verificar
256 function verificarLogin($login) {
257 $login = $this->_db->quote($login);
258 $sql = "SELECT count(*) as usuario.cuenta FROM usuario.Usuario WHERE login = '$login'";
259 $result = $db->query($sql);
260 if (PEAR::isError($result)) {
263 $row = $result->fetchRow(DB_FETCHMODE_ASSOC);
264 if ($row['cuenta'] != 0) {
271 * Devuelve un array de logins con aquellos que cumplan con algun requisito
274 * @param DB &$db Base de Datos
275 * @param string $login Login a filtrar. (Puede ser completo o una parte de el)
276 * @param string $nombre Nombre a filtrar.
282 function filtrarUsuarios(&$db, $login, $nombre) {
283 if ($login && $nombre) {
284 return new PEAR_Error('Solo debe ingresarse una opcion de filtro,
285 login o nombre, a la vez.');
287 $sql = "SELECT u.login as login, u.nombre as nombre FROM usuario.Usuario as u
291 $sql.= ' u.login LIKE \'%'.$login.'%\'';
294 $sql.= ' u.nombre LIKE \'%'.$nombre.'%\'';
296 $sql.= 'ORDER BY u.login';
298 $db->setFetchMode(DB_FETCHMODE_ASSOC);
299 $result = $db->query($sql);