cpet/openbsd-ports
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

create LOCKDIR if it doesn't already exist

Browse Source 
ok espie@
This commit is contained in:
sturm 2005-11-01 10:54:42 +00:00
parent 097bf89941
commit 76a0bc8eef
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
infrastructure/build/dolock
View File

@ -1,5 +1,5 @@
#! /usr/bin/perl
# $OpenBSD: dolock,v 1.1 2004/11/07 10:09:35 espie Exp $
# $OpenBSD: dolock,v 1.2 2005/11/01 10:54:42 sturm Exp $
# Copyright (c) 2004 Marc Espie <espie@openbsd.org>
#
# Permission to use, copy, modify, and distribute this software for any
@ -17,13 +17,20 @@
use strict;
use warnings;
use Fcntl;
use File::Basename;
if (@ARGV != 1) {
exit(1);
}
my $fname = shift;
my $dname = dirname $fname;
my $done = 0;
unless (-d $dname) {
require File::Path;
File::Path::mkpath($dname);
}
while(1) {
if (sysopen my $handle, $fname, O_WRONLY | O_EXCL | O_CREAT, 0666) {
close($handle);