pvelogo => 0, # ignore
};
-my $resolve_skip_files = {
- default => {},
- wiki => { 'pve-admin-guide.adoc' => 1 },
- manvolnum => {},
-};
-
my $fileinfo = {};
my $start_env = [];
}
sub register_blockid {
- my ($filename, $blockid, $env_list) = @_;
+ my ($filename, $blockid, $reftext, $env_list) = @_;
foreach my $e (@$env_list) {
my $fn = $fileinfo->{blockid}->{$e}->{$blockid};
die "blockid '$blockid' already defined in $fn"
if defined($fn);
$fileinfo->{blockid}->{$e}->{$blockid} = $filename;
+ $fileinfo->{reftext}->{$e}->{$blockid} = $reftext
+ if defined($reftext);
}
}
chomp $env_last_line->{$e};
}
- # fixme: also scan <<>>
-
- while ($line =~ m/xref:([^\s\[\]]+)\[([^\]]*)\]/g) {
- # print "$filename xref:$1 [$2]\n";
+ if ($line =~ m/^:(\S+?):\s*(.*\S)?\s*$/) {
+ my ($key, $value) = ($1, $2);
+ if ($key eq 'pve-toplevel') {
+
+ foreach my $e (@{$env_stack->[-1]}) {
+ my $title = $fileinfo->{titles}->{$e}->{$filename};
+ die "not title for toplevel file '$filename' (env=$e)\n"
+ if !defined($title);
+ $fileinfo->{toplevel}->{$e}->{$filename} = 1;
+ }
+ }
}
if ($line =~ m/^\[\[(.*)\]\]\s*$/) {
my $blockid = $1;
die "implement me" if $blockid =~m/,/;
- register_blockid($filename, $blockid, $env_stack->[-1]);
+ my $reftext = '';
+ register_blockid($filename, $blockid, $reftext, $env_stack->[-1]);
}
# fixme: "anchor:"
# bibliography anchors
if ($line =~ m/\[\[\[([^\]]*)\]\]\]/) {
my $blockid = $1;
die "implement me" if $blockid =~m/,/;
- register_blockid($filename, $blockid, $env_stack->[-1]);
+ register_blockid($filename, $blockid, "[$blockid]", $env_stack->[-1]);
}
}
}
while ($repeat) {
$repeat = 0;
foreach my $fn (keys %$include_hash) {
- next if $resolve_skip_files->{$env}->{$fn};
if ($include_hash->{$fn}->{$filename}) {
$filename = $fn;
$repeat = 1;
my $fn = resolve_link_target($e, $blockid_hash->{$blockid});
if ($e eq 'wiki') {
my $title = $fileinfo->{titles}->{$e}->{$fn};
- $title =~ s/\s/_/g;
$title =~ s/\{pve\}/Proxmox VE/g;
+ $title =~ s/\s/_/g;
die "found not title for '$fn' in env '$e'" if !$title;
$fileinfo->{blockid_target}->{$e}->{$blockid} = "link:/wiki/$title#$blockid";
} else {