From 8a4cddd345ea1c6081f90138abcb6874303dc6ad Mon Sep 17 00:00:00 2001
From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Sat, 12 Aug 2000 12:41:26 +0000
Subject: [PATCH] use getPath() for create logdir for openLog()

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@38 c11ca15a-4712-0410-83d8-924469b57eb5
---
 src/logger.pl | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

diff --git a/src/logger.pl b/src/logger.pl
index 6d0ec1c..b8eb4b9 100644
--- a/src/logger.pl
+++ b/src/logger.pl
@@ -73,6 +73,20 @@ sub openLog {
     return unless (&IsParam("logfile"));
     $file{log} = $param{'logfile'};
 
+    my $error = 0;
+    my $path = &getPath($file{log});
+    while (! -d $path) {
+	if ($error) {
+	    &ERROR("openLog: failed opening log to $file{log}; disabling.");
+	    delete $param{'logfile'};
+	    return;
+	}
+
+	&status("openLog: making $path.");
+	last if (mkdir $path, 0755);
+	$error++;
+    }
+
     if (&IsParam("logType") and $param{'logType'} =~ /DAILY/i) {
 	my ($day,$month,$year) = (localtime(time()))[3,4,5];
 	$logDate = sprintf("%04d%02d%02d",$year+1900,$month+1,$day);
-- 
2.39.2