# ENTRY COMMENT POSTER IP ADDRESS HARVESTING CODE
# WHEE.
# take this code and toss it into the very bottom of your layer.
# once you've finished harvesting, remove this code.
# base function is Page::lay_print_page()
# it handles it for all page views
# we shall create a specific one for EntryPages
function EntryPage::lay_print_page() {
# if url argument is set, do special stuff
if($.args{"comments"} != "") {
"""
URL form looks like:
http://www.livejournal.com/users/$.journal.username/12345.html?s2id=123456789&.comments=1&view=flat Copy/Paste this table into Notepad.
Copy/Paste that content into Excel.
Select both columns.
Sort by name.
Ignore duplicates.
Enjoy.
""";
$this->print_comments($.comments);
"";
} else {
# else print as normal
"""
""";
$this->lay_print_header();
$this->lay_print_body();
$this->lay_print_footer();
""" """;
}
}
function EntryPage::print_comments (Comment[] cs) {
if (size $cs == 0) { return; }
foreach var Comment c ($cs) {
var int indent = ($c.depth - 1) * 25;
"
\n";
if ($c.full and $.args{"comments"} == "") {
$this->print_comment($c);
} else {
$this->print_comment_partial($c);
}
"";
$this->print_comments($c.replies);
}
}
function EntryPage::print_comment_partial(Comment comment) {
# if url argument is set, do special stuff
if($.args{"comments"} != "") {
if($comment.poster.username != "") {
if($comment.metadata{"poster_ip"} != "") {
"";
var string url = $comment.poster->base_url() + "/";
"""
$comment.poster.username""" + $comment.metadata{"poster_ip"};
"";
}
}
} else {
# else print as normal
"""
""";
print "
"+($comment.subject==""?"(no subject)":"$comment.subject")+" - ";
print (defined $comment.poster?"$comment.poster":"Anonymous");
"""""";
}
}
#/WHEE.
#/ENTRY COMMENT POSTER IP ADDRESS HARVESTING CODE