Lines Matching refs:file_name
354 ## file_name -- The name of the file to open and lock.
366 my $file_name = shift;
387 $result = sysopen(FILE_TO_LOCK, $file_name, Fcntl::O_RDWR);
390 return (undef, "Unable to open '$file_name': $!");
396 return (undef, "Could not obtain lock on '$file_name': $!");
404 return (undef, "Could not obtain fcntl lock on '$file_name': $!");
502 $self->{file_name} = $queue_dir . '/' . $qprefix . $self->{id};
556 open(CONTROL_FILE, "$self->{file_name}");
658 ($lock_handle, $result) = ::lock_file($self->{file_name});
693 $result = open(QUEUE_FILE, $self->{file_name});
696 return "Unable to open '$self->{file_name}': $!";
701 return "Unable to stat '$self->{file_name}': $!";
719 $result = unlink($self->{file_name});
722 return "Unable to delete $self->{file_name}: $!";
754 $self->{file_name} = $data_dir . '/df' . $self->{id};
755 return if -e $self->{file_name};
764 $self->{file_name} = $data_dir . '/df' . $self->{id};
773 $result = open(QUEUE_FILE, $self->{file_name});
776 return "Unable to open '$self->{file_name}': $!";
781 return "Unable to stat '$self->{file_name}': $!";
792 $result = unlink($self->{file_name});
795 return "Unable to delete $self->{file_name}: $!";
845 @result = stat($self->{data_file}->{file_name});
924 $result = ::move_file($self->{data_file}->{file_name},
930 $result = ::move_file($self->{control_file}->{file_name},
1030 my $file_name;
1060 foreach $file_name (@control_files)
1062 $id = substr($file_name, 2);