From 45bc957ce2739336223af92270b77ab8375d17c2 Mon Sep 17 00:00:00 2001
From: Leandro Lucarella <llucax@gmail.com>
Date: Sun, 27 Feb 2005 23:38:24 +0000
Subject: [PATCH 1/1] Manda mails notificando si compila bien.

---
 doc/examples/sercom.ini         |   4 ++
 src/sc_fetch                    |   3 +-
 src/sc_test                     | 102 +++++++++++++++++++++++++-------
 test/clean.sh                   |   2 +-
 test/data/ejercicios/1/Makefile |   2 +-
 test/sercom.ini                 |   5 +-
 6 files changed, 91 insertions(+), 27 deletions(-)

diff --git a/doc/examples/sercom.ini b/doc/examples/sercom.ini
index 7d190ee..781b1b1 100644
--- a/doc/examples/sercom.ini
+++ b/doc/examples/sercom.ini
@@ -27,6 +27,10 @@ from = TALLER DE PROGRAMACION I <7542@fi.uba.ar>
 ; Mailbox local en donde hacer backup de los mails entregados
 ; (si está vacío no se hace backup)
 mbox_bak = /var/lib/sercom/entregas.mbox
+; Prefijo a agregarle al subject de los mails enviados.
+prefijo = 75.42
+; Servidor SMTP por el cual enviar los mails.
+smtp = localhost
 
 ; pop
 ;server = pop.example.com
diff --git a/src/sc_fetch b/src/sc_fetch
index 3455028..528b1db 100755
--- a/src/sc_fetch
+++ b/src/sc_fetch
@@ -158,7 +158,7 @@ imap_close($mbox);
 
 function enviar_respuesta($tipo, $to, $mensaje = '', $intento = null) {
     global $mconf;
-    $subject = '[' . strtoupper($NAME) . '] Entrega ';
+    $subject = $mconf['prefijo'] . 'Entrega ';
     if ($tipo == R_OK) $estado = 'ACEPTADA';
     else               $estado = 'RECHAZADA';
     $subject .= $estado;
@@ -169,6 +169,7 @@ function enviar_respuesta($tipo, $to, $mensaje = '', $intento = null) {
     $headers = <<<EOT
 From: {$mconf['from']}
 Reply-To: {$mconf['admin']}
+Return-Path: {$mconf['admin']}
 X-Mailer: $NAME $VERSION
 X-Priority: 5
 EOT;
diff --git a/src/sc_test b/src/sc_test
index a1a4a06..2e4be20 100755
--- a/src/sc_test
+++ b/src/sc_test
@@ -11,6 +11,7 @@ import glob
 import shutil
 import datetime
 import subprocess
+import email.MIMEMultipart
 # Módulos locales
 import sercom
 import sercom.sqlo
@@ -56,30 +57,41 @@ def sigterm(signum, frame):
 def chroot_dir(intento):
     return os.path.join(intento.path, 'chroot')
 
-def compilar(intento):
+def compilar(intento, mail):
     global log
     # Busco makefile
     makefile = os.path.join(intento.entrega.ejercicio.path, 'Makefile')
     # Compilo
     log.debug('Ejecutando: make -f %s', makefile)
     intento.inicioCompila = datetime.datetime.now()
-    make = subprocess.Popen(('make', '-f', makefile), stdout=subprocess.PIPE,
-        stderr=subprocess.PIPE, cwd=intento.path)
+    make = subprocess.Popen(('make', '-f', makefile), stderr=subprocess.PIPE,
+        cwd=intento.path)
     make.wait()
     intento.finCompila = datetime.datetime.now()
     log.debug('Fin del comando: make -f %s', makefile)
     # Verifico compilación
-    if make.returncode:
-        log.debug('Error al compilar, código de retorno: %d, salida estándar: '
-            '%s, salida de error: %s)', make.returncode, make.stdout.read(),
-            make.stderr.read())
-        intento.compila = False
-        #TODO enviar_respuesta(R_ERR, $mail, "ERROR AL COMPILAR!\n\n$err\n\nCódigo de retorno: $ret\n", $intento);
-        return False
-    log.debug('Compilado OK')
-    intento.compila = True
-    #TODO mail acumulativo
-    return True
+    stderr = make.stderr.read()
+    intento.compila = not make.returncode
+    msg = 'Compilación: '
+    if intento.compila and not stderr:
+        msg += 'BIEN'
+    elif intento.compila:
+        msg += 'CON ADVERTENCIAS'
+    else:
+        msg += 'ERROR (código de retorno: %d)' % make.returncode
+    mail.body += msg
+    if stderr:
+        msg += '''Salida:
+------------------------------------------------------------------------
+%s
+------------------------------------------------------------------------
+
+''' % stderr
+        mail.body += "\n(se adjunta salida, archivo 'make.stderr')\n"
+        mail.attachText(stderr, 'make.stderr')
+    mail.body += '\n\n'
+    intento.observaciones = msg + '\n\n'
+    log.debug(msg)
 
 def preparar(intento):
     # Creo chroot - TODO copiarlo de algún lado donde ande el valgrind?
@@ -91,7 +103,7 @@ def limpiar(intento):
     # Borro chroot entero
     shutil.rmtree(chroot_dir(intento))
 
-def probar(intento, caso_de_prueba):
+def probar(intento, caso_de_prueba, mail):
     # Cosas útiles
     global log, conn, conf, uid, gid
     # Para manejo de SIGCHLD
@@ -250,6 +262,48 @@ def params2seq(params):
         seq.append(buff)
     return seq
 
+class MailIntento(email.MIMEMultipart.MIMEMultipart, object):
+    def __init__(self, intento):
+        global conf
+        from email.MIMEMultipart import MIMEMultipart
+        from email.MIMEMessage import MIMEMessage
+        from email.MIMEText import MIMEText
+        MIMEMultipart.__init__(self)
+        self.subject = '[%s] Resultado del intento %d del ejercicio %d.%d' % \
+            (conf.get('mail', 'prefijo'), intento.numero,
+                intento.entrega.nroEjercicio, intento.entrega.entrega)
+        self['From'] = conf.get('mail', 'from')
+        self['To'] = intento.mailRespuesta
+        self['Reply-To'] = conf.get('mail', 'admin')
+        self['Return-Path'] = conf.get('mail', 'admin')
+        self['X-Mailer'] = 'sercom 0.3'
+        self['X-Priority'] = '5'
+        self.epilogue = 'Para ver correctamente este e-mail su cliente debe ' \
+            'soportar MIME.\n\n'
+        self.prologue = '' # Garantiza que termine en \n el mensaje
+        self.attach(MIMEMessage(MIMEText('', 'plain', 'iso-8859-1')))
+        self.resultado = None
+    def __set_body(self, body):
+        self.get_payload(0).get_payload(0).set_payload(body)
+    def __get_body(self):
+        return self.get_payload(0).get_payload(0).get_payload()
+    body = property(__get_body, __set_body, doc='Cuerpo del mensaje.')
+    def attachText(self, text, nombre=None):
+        from email.MIMEText import MIMEText
+        attach = MIMEText(text, 'plain', 'iso-8859-1')
+        if nombre:
+            attach.add_header('Content-Disposition', 'attachment', filename=nombre)
+        self.attach(attach)
+    def send(self, resultado=None):
+        import smtplib
+        global conf
+        smtp = smtplib.SMTP(conf.get('mail', 'smtp'))
+        if resultado:
+            self.subject += ': ' + resultado
+        self['Subject'] = self.subject
+        smtp.sendmail(self['From'], self['To'], self.as_string())
+        smtp.close()
+
 # Manejadores de señales
 signal.signal(signal.SIGTERM, sigterm)
 signal.signal(signal.SIGINT, sigterm)
@@ -282,9 +336,11 @@ while continuar:
         time.sleep(intervalo)
         continue
     log.info('Nuevo intento a probar (%s)', intento)
+    mail = MailIntento(intento)
     # Compila
-    if not compilar(intento):
-        #TODO mandar mail
+    compilar(intento, mail)
+    if not intento.compila:
+        mail.send('NO COMPILA')
         continue
     # Ejecución de casos de prueba
     intento.inicioPruebas = datetime.datetime.now()
@@ -293,17 +349,17 @@ while continuar:
         # Preparo chroot
         preparar(intento)
         # Pruebo y agrego prueba a la lista
-        pruebas.append(probar(intento, caso_de_prueba))
+        prueba = probar(intento, caso_de_prueba, mail)
+        mail.body += 'Prueba %s: %s (%s)\n' % (prueba.casoDePrueba.nombre, prueba.pasada, prueba.observaciones)
+        pruebas.append(prueba)
         # Limpio chroot
         limpiar(intento)
+    #TODO Si es publica, veo si se hizo ok o no y voy creando mail
     intento.finPruebas = datetime.datetime.now()
+    mail.send('NO SEP')
     # Limpio directorio
     log.debug('Borrando ejecutable y código objeto (*.o)')
     os.remove(os.path.join(intento.path, 'tp'))
     [os.remove(obj) for obj in glob.glob(os.path.join(intento.path, '*.o'))]
-    #TODO Armar mail de respuesta al alumno
-    for prueba in pruebas:
-        #TODO Si es publica, veo si se hizo ok o no y voy creando mail
-        pass
-    time.sleep(intervalo)
+    # time.sleep(intervalo) #XXX Puede servir para enlentecer el server
 
diff --git a/test/clean.sh b/test/clean.sh
index 297f862..f9d5f23 100755
--- a/test/clean.sh
+++ b/test/clean.sh
@@ -1,5 +1,5 @@
 #!/bin/sh
-../src/sc_dbq Intento set 1 compila=None \
+../src/sc_dbq Intento set 1 compila=None observaciones=None \
 	&& ../src/sc_dbq Prueba rm 1 \
 	&& ../src/sc_dbq Prueba rm 2 \
 	&& ../src/sc_dbq Prueba rm 3
diff --git a/test/data/ejercicios/1/Makefile b/test/data/ejercicios/1/Makefile
index 89fc2f3..8392865 100644
--- a/test/data/ejercicios/1/Makefile
+++ b/test/data/ejercicios/1/Makefile
@@ -28,7 +28,7 @@ extension = c
 ###########################
 
 # Opciones para el compilador C.
-CFLAGS = -Wall -ggdb -ansi -pedantic -DDEBUG
+CFLAGS = -Wall -ggdb -ansi -DDEBUG -pedantic
 
 # Opciones para el compilador C++.
 CXXFLAGS = $(CFLAGS) -fno-inline
diff --git a/test/sercom.ini b/test/sercom.ini
index 84574b9..e4bef9c 100644
--- a/test/sercom.ini
+++ b/test/sercom.ini
@@ -29,7 +29,10 @@ from     = TALLER DE PROGRAMACION I <7542@fi.uba.ar>
 ; Mailbox local en donde hacer backup de los mails entregados
 ; (si está vacío no se hace backup).
 mbox_bak = mbox
-
+; Prefijo a agregarle al subject de los mails enviados.
+prefijo = 75.42
+; Servidor SMTP por el cual enviar los mails.
+smtp = burns
 
 ; fiuba (imap)
 server   = mail.fi.uba.ar
-- 
2.43.0