From 70ceee2fbb4ac514ca54ec661793e8788a3295ec Mon Sep 17 00:00:00 2001
From: Leandro Lucarella <llucax@gmail.com>
Date: Wed, 2 Mar 2005 01:05:58 +0000
Subject: [PATCH] =?utf8?q?Chequeo=20de=20errores=20al=20abrir=20archivo=20?=
 =?utf8?q?de=20configuraci=C3=B3n=20y=20opci=C3=B3n=20de=20l=C3=ADnea=20de?=
 =?utf8?q?=20comando=20de=20sc=5Ffetch=20para=20agregar=20un=20directorio?=
 =?utf8?q?=20al=20include=5Fpath.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 src/T/general.php | 4 ++++
 src/sc_fetch      | 9 +++++++--
 2 files changed, 11 insertions(+), 2 deletions(-)

diff --git a/src/T/general.php b/src/T/general.php
index ec75869..d4ce5ed 100644
--- a/src/T/general.php
+++ b/src/T/general.php
@@ -21,6 +21,10 @@ foreach (array('.', '/etc', '/etc/'.$NAME) as $dir) {
         }
     }
 }
+if (!$CONF) {
+    fputs(STDERR, "No se pudo abrir archivo de configuración!\n");
+    exit(1);
+}
 unset($cf, $dir);
 
 // Configuración de DB_DataObject
diff --git a/src/sc_fetch b/src/sc_fetch
index 528b1db..a1a9ef0 100755
--- a/src/sc_fetch
+++ b/src/sc_fetch
@@ -1,6 +1,11 @@
 #!/usr/bin/php4
 <?php // vim: set binary noeol et sw=4 sts=4:
 
+// Si me pasan un directorio de bibliotecas, lo uso.
+if (@$argv[1]) {
+    set_include_path(get_include_path().':'.$argv[1]);
+}
+
 require_once 'T/general.php';
 
 define('R_ERR', 0);
@@ -13,7 +18,7 @@ $mconf = $CONF['mail'];
 $gconf = $CONF['general'];
 
 $mailbox = @$mconf['mailbox'];
-switch (@$mconf['protocol'] ? $mconf['protocol'] : 'mbox') {
+switch (@$mconf['protocol']) {
     case 'mbox':
         $mailbox = $mconf['server'];
         break;
@@ -73,7 +78,7 @@ while (1) {
     // Reseteo intervalo
     $intervalo = $gconf['intervalo'];
     // Abro mailbox o chillo.
-    if (!($mbox = imap_open($mailbox, @$mconf['user'], @$mconf['pass']))) {
+    if (!($mbox = @imap_open($mailbox, @$mconf['user'], @$mconf['pass']))) {
         if ($mbox_errcount * $intervalo > 120) { // 2 horas sin poder conectarse
             logs('Hace 2 horas que no se puede conectar al servidor ('.imap_last_error().')', ERROR);
             $mbox_errcount = 0;
-- 
2.43.0