1 <?php // vim: set binary noeol et sts=4 sw=4 :
4 require_once 'DB/DataObject.php';
5 require_once 'T/code.php';
6 require_once 'T/Prueba.php';
8 /// @todo Poner todos los querys con quoting ('?').
9 /// @todo Mejorar manejo de errores con PEAR.
22 function T_Intento($padron = null, $ej = null, $ent = null, $intento = null, $cuat = null)
24 $this->__construct($padron, $ej, $ent, $intento, $cuat);
30 function __construct($padron = null, $ej = null, $ent = null, $intento = null, $cuat = null)
32 $this->padron = $padron;
33 $this->ejercicio = $ej;
34 $this->entrega = $ent;
35 $this->intento = $intento;
36 $this->cuatrimestre = $cuat;
37 $this->base_dir = 'intentos';
41 * Representación de string
47 Padrón: {$this->padron}
48 Ejercicio: {$this->ejercicio}
49 Entrega: {$this->entrega}
50 Cuatrimestre: {$this->cuatrimestre}
51 Intento: {$this->intento}
56 * Muestra el intento como una línea.
60 return "{$this->padron} {$this->ejercicio}.{$this->entrega}.{$this->intento} {$this->cuatrimestre}";
64 * Toma de los atributos publicos padron, entrega y ejercicio
65 * En el atributo publico intento deja el numero de intento que corresponderia
66 * a esta entrega del alumno y en cuatrimestre el cuatrimestre en que cursa
67 * @param code Código verificador
68 * @param clave Clave a utilizar para validar el código
69 * @return string con la descripcion del error, si esta vacio fue ok
71 function validar_entrega($code, $claves)
73 $query = "SELECT C.id, C.anio, C.cuatrimestre, C.curso
74 FROM alumno A JOIN cuatrimestre C ON (A.id_cuatrimestre = C.id)
75 WHERE A.padron = {$this->padron} AND C.activo = 1";
76 $inscripto = DB_DataObject::factory('inscripto');
77 if (!$inscripto->getFrom($this->padron)) return 'El alumno no está inscripto';
78 $inscripto->getLinks();
79 $cuat = $inscripto->_curso_id->toLine();
80 $this->cuatrimestre = $cuat;
81 if (!T_chequear_codigo($code, $this->padron, $claves))
82 return 'La clave de la entrega no es válida';
83 $this->llegada = time();
84 $date = date('Y-m-d H:i:s', $this->llegada);
85 $entrega = DB_DataObject::factory('entrega');
86 $entrega->getFrom($inscripto->curso_id, $this->ejercicio, $this->entrega);
87 if (!($entrega->desde <= $date and $entrega->hasta >= $date)) return 'El ejercicio está siendo entregado fuera de fecha';
88 $intento = DB_DataObject::factory('intento');
89 $intento->id_entrega = $entrega->id;
90 $intento->id_inscripto = $inscripto->id;
91 $cant = $intento->find();
92 $this->intento = 1 + $cant;
93 $this->id_entrega = $entrega->id;
94 $this->id_inscripto = $inscripto->id;
99 * Toma de los atributos publicos cuatrimestre, padron, entrega, ejercicio, mail e intento
100 * Debería llamarse antes a validar_entrega siempre
101 * En el atributo publico intento deja el numero de intento del alumno
102 * @param mail Mail con el que se recibió la entrega
103 * @return resultado del query
105 function hacer_entrega($mail)
107 $intento = DB_DataObject::factory('intento');
108 $intento->inscripto_id = $this->id_inscripto;
109 $intento->entrega_id = $this->id_entrega;
110 $intento->numero = $this->intento;
111 $intento->llegada = date('Y-m-d H:i:s', $this->llegada);
112 $intento->mail_respuesta = $mail;
113 return $intento->insert();
117 * Pone en los atributos publicos cuatrimestre, padron, entrega, ejercicio e intento
118 * retorna true si encuentra alguno y false sino.
120 function proximo_a_probar()
122 $result = $this->db->getRow("SELECT cuatrimestre, padron, ejercicio, entrega, intento, mail
124 WHERE inicio_pruebas is null
127 if (DB::isError($result) or is_null($result)) return false;
128 $date = date('YmdHis');
129 $this->cuatrimestre = $result[0];
130 $this->padron = $result[1];
131 $this->ejercicio = $result[2];
132 $this->entrega = $result[3];
133 $this->intento = $result[4];
134 $this->db->query("UPDATE intento SET inicio_pruebas = '$date'
135 WHERE cuatrimestre = {$this->cuatrimestre} AND
136 padron = {$this->padron} AND
137 ejercicio = {$this->ejercicio} AND
138 entrega = {$this->entrega} AND
139 intento = {$this->intento}");
144 * Toma de los atributos publicos cuatrimestre, padron, entrega, ejercicio e intento
145 * el parametro indica si compilo ok es true, sino es false
147 function informar_compilacion($compilo_ok)
149 if ($compilo_ok) $compilo_ok = 1;
150 else $compilo_ok = 0;
151 $date = date('YmdHis');
153 return $this->db->query("
154 UPDATE intento SET fin_pruebas = '$date' AND compila_ok = $compilo_ok
155 WHERE cuatrimestre = {$this->cuatrimestre} AND
156 padron = {$this->padron} AND
157 ejercicio = {$this->ejercicio} AND
158 entrega = {$this->entrega} AND
159 intento = {$this->intento}");
163 * Toma de los atributos publicos cuatrimestre, padron, entrega, ejercicio e intento
164 * carga el atributo publico caso_de_prueba con el proximo caso de prueba a usar
165 * devuelve true si encuentra alguno, sino devuelve false
167 function pedir_caso_de_prueba()
169 $prueba = $this->db->getRow("
170 SELECT C.caso_de_prueba, C.privado, C.descripcion, C.parametros, C.salidas
171 FROM caso_de_prueba as C
172 WHERE C.cuatrimestre = $this->cuatrimestre AND
173 C.ejercicio = $this->ejercicio AND
174 C.entrega = $this->entrega AND
175 C.caso_de_prueba NOT IN (
176 SELECT P.caso_de_prueba from prueba as P
177 WHERE P.cuatrimestre = $this->cuatrimestre
178 AND P.entrega = $this->entrega
179 AND P.ejercicio = $this->ejercicio
180 AND P.padron = $this->padron
181 AND P.intento = $this->intento
183 if (!is_null($prueba) && !DB::isError($prueba)) {
184 list($id, $priv, $desc, $params, $salidas) = $prueba;
185 return new T_Prueba($id, $priv, $desc, $params, $salidas);
191 * Toma de los atributos publicos cuatrimestre, padron, entrega, ejerciico e intento
192 * Carga los resultados de una prueba en un nuevo registro en prueba
194 function resultado_de_prueba($prueba, $salida, $descripcion = "")
196 if($memoria)$memoria = 1;
198 if($salida)$salida = 1;
200 $date = date("YmdHis");
201 $this->db->query("INSERT INTO prueba
202 (cuatrimestre, padron, ejercicio, entrega, intento, caso_de_prueba, memoria_ok, salida_ok, descripcion)
203 VALUES ($this->cuatrimestre, $this->padron, $this->ejercicio, $this->entrega, $this->intento, $prueba->id,
204 $prueba->memoria, $salida, '$descripcion')");
205 $this->db->query("UPDATE intento SET fin_pruebas = '$date'
206 WHERE cuatrimestre = {$this->cuatrimestre} AND
207 padron = {$this->padron} AND
208 ejercicio = {$this->ejercicio} AND
209 entrega = {$this->entrega} AND
210 intento = {$this->intento}");
214 * Busca una de los intentos no notificados cual tiene todas las pruebas terminadas y la
215 * hora de llegada + $hora es menor que ahora. el registro despues se marca como notificado.
216 * Deja en los atributos publicos cuatrimestre, padron, ejercicio, entrega, intento y mail
217 * en mail deja la suma del mail del intento y del mail del alumno
218 * devuelve el/los mails a donde mandar la notificación si encuentra alguno y false sino
220 function notificacion_pendiente($horas = 1)
222 $date = date("YmdHis");
223 $date -= 10000*$horas;
224 $row = $this->db->getRow("SELECT I.cuatrimestre as cuatrimestre, I.padron, I.ejercicio as ejercicio,
225 I.entrega as entrega, I.intento, I.mail
226 FROM intento I JOIN prueba P ON (I.ejercicio = P.ejercicio AND
227 I.cuatrimestre = P.cuatrimestre AND
228 I.entrega = P.entrega AND
229 I.padron = P.padron AND
230 I.intento = P.intento)
231 WHERE notificado is null
232 AND '$date' >= I.llegada
233 GROUP BY I.cuatrimestre, I.padron, I.ejercicio, I.entrega, I.intento, I.mail
234 HAVING count(P.memoria_ok) = (
235 SELECT count(1) FROM caso_de_prueba C
236 WHERE ejercicio = C.ejercicio AND
237 entrega = C.entrega AND
238 cuatrimestre = C.cuatrimestre)");
240 if(is_null($row) || is_a($row, "db_error")) return false;
241 $this->cuatrimestre = $row[0];
242 $this->padron = $row[1];
243 $this->ejercicio = $row[2];
244 $this->entrega = $row[3];
245 $this->intento = $row[4];
247 $this->db->query("UPDATE intento SET notificado = 1
248 WHERE cuatrimestre = $this->cuatrimestre and
249 padron = $this->padron and
250 ejercicio = $this->ejercicio and
251 entrega = $this->entrega and
252 intento = $this->intento");
253 $mail2 = $this->db->getOne("select mail_alumno FROM alumno
254 WHERE cuatrimestre = $this->cuatrimestre AND
255 padron = $this->padron");
256 if(strtolower($mail) != strtolower($mail2)) $mail .= ";$mail2";
262 * Obtiene el directorio en el cual se almacena el intento.
265 return $this->base_path() . "/{$this->padron}/{$this->intento}";
269 * Obtiene el directorio base de la entrega.
270 * El directorio base no contempla los datos propios del intento, como
272 * @param base_dir Directorio base, si no se especifica se usa el directorio
275 function base_path($base_dir = null) {
276 if (is_null($base_dir)) $base_dir = $this->base_dir;
277 return "$base_dir/{$this->cuatrimestre}/{$this->ejercicio}-{$this->entrega}";