linux - 从里面找出 'at'作业的ID

Question

当我用“at”安排工作时，它被分配了一个 id，即:

2014-01-28 17:30 的工作 44

当该作业运行时，我想从其中获取该 ID。这是在 FWIW 的 Centos 上。我已经确定没有环境变量包含 ID。当该作业中的 Perl 代码运行时，我希望它能够打印作业 ID(本例中为 44)。

是的，我知道 atq 在正在执行的作业旁边显示一个 =，但一次可能有多个作业。

我可以做一些事情，比如在安排作业时将唯一参数传递给作业，捕获 ID，将其和参数保存到某个文件中，然后从作业中读取它。如果不需要，我宁愿不去做很多工作，看起来这应该很简单，但我正在画一个空白。

Answer 1

以下内容是通过阅读 at-3.14 的源代码得出的。 at puts job id 的方式和运行到文件名的时间，任何版本应该都差不多，不过这个我没查过。

首先将作业 ID 和特定作业应运行的时间编码为描述作业的文件名。文件名的格式为aJJJJJTTTTTTTT，其中JJJJJ为5个字符的十六进制字符串，作业id，TTTTTTTT为8个字符的十六进制字符串，应该运行作业的时间。时间存储为从纪元算起的秒数。

At 作业通过将作业描述文件作为标准输入提供给 sh -c 来运行。幸运的是，Linux 内核提供了一个符号链接(symbolic link)，/proc/self/fd/0，它将指向当前正在执行的进程的标准输入(使用 ls -l/proc/self/fd/0 以防你需要向自己保证确实如此。

描述作业的文件在作业运行时已被删除。但是，该文件仍然可用于内核，因为它在用作作业的标准输入之前已使用 dup(2) 进行了复制。所以，实际上我们正在解析指向不再可见的文件名的符号链接(symbolic link)。在最后的 perl 脚本中，我们需要考虑到这一点，因为 readlink 将返回类似 /foo/bar/baz (deleted) 而不是 /foo/酒吧/巴兹。我们只对包含我们需要的所有信息的文件名感兴趣。

符号链接(symbolic link)指向已删除文件的原因是因为守护程序在执行作业之前取消链接原始文件。只有在创建一个副本(硬链接(hard link))后才能取消链接，该副本以 = 而不是 a 开头。有了这个，at 守护进程会尝试确保只有一个作业副本在运行:守护进程不会 execle(2)，即。如果 link(2) 失败，它将退出。因为原始文件已经被 open(2) 和 dup(2) inode 仍然存在供内核使用，因为它仍然有指向它的硬链接(hard link).

在相当长且可能令人困惑的介绍之后，这里是如何将它们放在一起:

#!/usr/bin/perl

use strict;
use warnings;

my $job_file = readlink("/proc/self/fd/0");
if (index($job_file, " ") > 0) {
        $job_file = substr($job_file, 0, index($job_file, " ") - 1);
}
my $tmp = substr($job_file, rindex($job_file, "/") + 1);
$tmp =~ s/^a([0-9a-f]{5})[0-9a-f]+/$1/;
my $job_id = hex($tmp);

if ($job_id > 0) {
        printf("My AT job id is %d.\n", $job_id);
}

# end of file.