/usr/share/plowshare/modules/pastebin.sh is in plowshare-modules 0~git20160124.8a8190d-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 | # Plowshare pastebin.com module
# Copyright (c) 2013 Plowshare team
#
# This file is part of Plowshare.
#
# Plowshare is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation, either version 3 of the License, or
# (at your option) any later version.
#
# Plowshare is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with Plowshare. If not, see <http://www.gnu.org/licenses/>.
MODULE_PASTEBIN_REGEXP_URL='http://\(www\.\)\?pastebin\.com/'
MODULE_PASTEBIN_LIST_OPTIONS="
COUNT,,count,n=COUNT,Take COUNT pastes when listing user folder. Default is 100 (first web page)."
MODULE_PASTEBIN_LIST_HAS_SUBFOLDERS=no
# Static function. Process a single note
# $1: pastebin url
pastebin_single_list() {
local URL=$1
local PAGE LINKS
if [ "${URL:0:1}" = '/' ]; then
URL="http://pastebin.com/raw.php?i=${URL#/}"
elif match '/[[:alnum:]]\+$' "$URL"; then
URL=$(echo "$URL" | replace 'pastebin.com/' 'pastebin.com/raw.php?i=')
elif ! match 'raw\.php?i=' "$URL"; then
log_error 'Bad link format'
return $ERR_FATAL
fi
PAGE=$(curl "$URL") || return
LINKS=$(parse_all . '\(https\?://[^[:space:]]\+\)' <<< "$PAGE") || return
# TODO: filter crappy links (length <15 chars, ...)
list_submit "$LINKS"
}
# List all links in a pastebin note
# $1: pastebin url
# stdout: list of links
pastebin_list() {
local -r URL=${1%/}
local PASTES PASTE
# User folder:
# - http://pastebin.com/u/username
if match '/u/[[:alnum:]]\+$' "$URL"; then
local HTML
HTML=$(curl "$URL") || return
if [ -n "$COUNT" ]; then
if (( COUNT > 100 )); then
COUNT=100
log_error "Too big integer value for --count, set it to $COUNT"
fi
else
COUNT=100
fi
log_debug "user folder: listing first $COUNT items (if available)"
PASTES=$(parse_all_attr 'title=.Public paste' href <<< "$HTML" | \
first_line $COUNT) || return
else
PASTES=$URL
fi
# Accepted link format
# - /xyz
# - http://pastebin.com/xyz
# - http://pastebin.com/raw.php?i=xyz
while IFS= read -r PASTE; do
pastebin_single_list "$PASTE" || continue
done <<< "$PASTES"
}
|