Changeset 426

Timestamp:

06/23/12 14:29:07 (12 years ago)

Author:

nanardon

Message:

• write pid file soon enough to still have root access

File:

• tools/trunk/bin/sophie-notify (modified) (3 diffs, 1 prop)

tools/trunk/bin/sophie-notify

@@ -36 +36 @@
 $configfile ||= '/etc/sophie/sophie-notify.conf';
 
-if (-f $configfile && (my $conf = Config::General->new($configfile))) {
-    my %config = $conf->getall;
-    $server      ||= $config{url};
-    $login       ||= $config{login};
-    $pass        ||= $config{pass};
-    $proxy       ||= $config{proxy};
-    $pidfile     ||= $config{pidfile};
-    $runas       ||= $config{runas};
+if (-f $configfile) {
+    if (my $conf = Config::General->new($configfile)) {
+        my %config = $conf->getall;
+        $server      ||= $config{url};
+        $login       ||= $config{login};
+        $pass        ||= $config{pass};
+        $proxy       ||= $config{proxy};
+        $pidfile     ||= $config{pidfile};
+        $runas       ||= $config{runas};
+    } else {
+        die "Cannot ope configuration file $configfile\n";
+    }
 }
 
 $updated_inotify ||= 500;
+
+if ($daemon) {
+    if (fork()) {
+        exit(0);
+    }
+}
+
+if ($pidfile) {
+    if (open(my $handle, '>', $pidfile)) {
+        print $handle $$ . "\n";
+        close($handle);
+    } else {
+    }
+}
+
 
 if ($runas) {
@@ -56 +75 @@
     if ($> ne $uid) {
         die "Cannot change to user $runas\n";
-    }
-}
-
-
-if ($daemon) {
-    if (fork()) {
-        exit(0);
     }
 }
@@ -76 +88 @@
     warn "Can't access to sophie web site, waiting 60s before retry\n";
     sleep 60;
-}
-
-if ($pidfile) {
-    if (open(my $handle, '>', $pidfile)) {
-        print $handle $$ . "\n";
-        close($handle);
-    } else {
-    }
 }