以原子方式将一行附加到文件，如果它不存在，则创建它

我正在尝试创建一个函数(用于日志记录(

append($file, $data)

那

1. 如果$file不存在，则创建它，并且
2. 以原子方式将$data附加到它。

它必须

• 支持高并发，
• 支持长字符串和
• 尽可能提高性能。

到目前为止，最好的尝试是：

function append($file, $data)
{
    // Ensure $file exists. Just opening it with 'w' or 'a' might cause
    // 1 process to clobber another's.
    $fp = @fopen($file, 'x');
    if ($fp)
        fclose($fp);
    
    // Append
    $lock = strlen($data) > 4096; // assume PIPE_BUF is 4096 (Linux)
    $fp = fopen($file, 'a');
    if ($lock && !flock($fp, LOCK_EX))
        throw new Exception('Cannot lock file: '.$file);
    fwrite($fp, $data);
    if ($lock)
        flock($fp, LOCK_UN);
    fclose($fp);
}

它工作正常，但它似乎相当复杂。有没有更清洁(内置？(的方法可以做到这一点？