- prepare obs 1.0->1.0.1 update:
[opensuse:build-service.git] / dist / buildservice-1.0.0-signd-pid.patch
1 diff -ruN buildservice-1.0.0-orig/src/sign/signd buildservice-1.0.0/src/sign/signd
2 --- buildservice-1.0.0-orig/src/sign/signd      2008-07-07 06:02:00.000000000 +0000
3 +++ buildservice-1.0.0/src/sign/signd   2008-06-25 22:20:08.000000000 +0000
4 @@ -217,13 +217,19 @@
5  if ($ARGV[0] eq '-f') {
6    my $pid = fork();
7    die("fork") if  !defined($pid) || $pid < 0;
8 -  exit(0) if $pid > 0;
9 +  #exit(0) if $pid > 0;
10 +  if ( $pid > 0 ){
11 +    open(PID, '>/var/run/signd.pid') || die("/var/run/signd.pid: $!\n");
12 +    print PID "$pid\n";
13 +    close(PID);
14 +    exit(0);
15 +  }
16  }
17  POSIX::setsid();
18  $SIG{'PIPE'} = 'IGNORE'; 
19  $| = 1;
20  my @lt = localtime(time);
21 -printf "%04d-%02d-%02d %02d:%02d:%02d: $myname started\n", $lt[5] + 1900, $lt[4] + 1, @lt[3,2,1,0];
22 +#printf "%04d-%02d-%02d %02d:%02d:%02d: $myname started\n", $lt[5] + 1900, $lt[4] + 1, @lt[3,2,1,0];
23  
24  socket(MS , PF_INET, SOCK_STREAM, IPPROTO_TCP) || die "socket: $!\n";
25  setsockopt(MS, SOL_SOCKET, SO_REUSEADDR, pack("l",1));