First commit
This commit is contained in:
Matthew Connelly
commit
7a3a80c791
|
|
@ -0,0 +1,9 @@
|
|||
*~
|
||||
*.swp
|
||||
blib
|
||||
Makefile
|
||||
Makefile.old
|
||||
.build
|
||||
*.db
|
||||
_Inline
|
||||
data/pastes.db
|
||||
|
|
@ -0,0 +1,13 @@
|
|||
App::WerePaste
|
||||
--------------
|
||||
|
||||
Perl-based pastebin software, largely a rewrite of Dancebin, using Pygments via Inline::Python for syntax highlighting.
|
||||
|
||||
Requirements:
|
||||
|
||||
- Dancer2
|
||||
- Dancer2::Plugin::DBIC
|
||||
- Data::UUID
|
||||
- Try::Tiny
|
||||
- Inline::Python
|
||||
- pip module Pygments
|
||||
|
|
@ -0,0 +1,9 @@
|
|||
#!/usr/bin/env perl
|
||||
use strict;
|
||||
use warnings;
|
||||
use FindBin;
|
||||
use lib "$FindBin::Bin/../lib";
|
||||
|
||||
use App::WerePaste;
|
||||
|
||||
App::WerePaste->start;
|
||||
|
|
@ -0,0 +1,167 @@
|
|||
appname: "WerePaste"
|
||||
layout: "main"
|
||||
charset: "UTF-8"
|
||||
tz: "Europe/London"
|
||||
locale: "en_GB"
|
||||
|
||||
logger: "console"
|
||||
log: "debug"
|
||||
|
||||
template: "template_toolkit"
|
||||
engines:
|
||||
template:
|
||||
template_toolkit:
|
||||
encoding: 'utf8'
|
||||
start_tag: '[%'
|
||||
end_tag: '%]'
|
||||
|
||||
|
||||
plugins:
|
||||
DBIC:
|
||||
default:
|
||||
schema_class: 'App::WerePaste::Schema'
|
||||
dsn: dbi:SQLite:dbname=data/pastes.db
|
||||
options:
|
||||
sqlite_unicode: 1
|
||||
|
||||
# Comment out for production
|
||||
show_errors: 1
|
||||
|
||||
# Sets the expiration for posts
|
||||
# Options can be any combination of weeks, days, hours, minutes, seconds
|
||||
expiration:
|
||||
weeks: 2
|
||||
|
||||
|
||||
# Languages supported by Pygments
|
||||
languages:
|
||||
- Programming languages:
|
||||
- ActionScript:
|
||||
- Ada:
|
||||
- ANTLR:
|
||||
- AppleScript:
|
||||
- Assembly: nasm
|
||||
- Asymptote:
|
||||
- Awk:
|
||||
- Bash:
|
||||
- Befunge:
|
||||
- Boo:
|
||||
- BrainFuck:
|
||||
- C:
|
||||
- C++:
|
||||
- C#:
|
||||
- Clojure:
|
||||
- CoffeeScript:
|
||||
- ColdFusion: cfm
|
||||
- Common Lisp:
|
||||
- Coq:
|
||||
- Cryptol:
|
||||
- Cython:
|
||||
- D:
|
||||
- Dart:
|
||||
- Delphi:
|
||||
- Dylan:
|
||||
- Erlang:
|
||||
- Factor:
|
||||
- Fancy:
|
||||
- Fortran:
|
||||
- F#:
|
||||
- GAP:
|
||||
- Gherkin:
|
||||
- GL shaders:
|
||||
- Groovy:
|
||||
- Haskell:
|
||||
- IDL:
|
||||
- Io:
|
||||
- Java:
|
||||
- JavaScript:
|
||||
- Lasso:
|
||||
- LLVM:
|
||||
- Logtalk:
|
||||
- Lua:
|
||||
- Matlab:
|
||||
- MiniD:
|
||||
- Modelica:
|
||||
- Modula-2:
|
||||
- MuPad:
|
||||
- Nemerle:
|
||||
- Nimrod:
|
||||
- Objective-C:
|
||||
- Objective-J:
|
||||
- Octave:
|
||||
- OCaml:
|
||||
- PHP:
|
||||
- Perl:
|
||||
- PovRay:
|
||||
- PostScript:
|
||||
- PowerShell:
|
||||
- Prolog:
|
||||
- Python:
|
||||
- REBOL:
|
||||
- Red:
|
||||
- Redcode:
|
||||
- Ruby:
|
||||
- Rust:
|
||||
- R:
|
||||
- S:
|
||||
- S-Plus:
|
||||
- Scala:
|
||||
- Scheme:
|
||||
- Scilab:
|
||||
- Smalltalk:
|
||||
- SNOBOL:
|
||||
- Tcl:
|
||||
- Vala:
|
||||
- Verilog:
|
||||
- VHDL:
|
||||
- Visual Basic.NET: vbnet
|
||||
- Visual FoxPro: foxpro
|
||||
- XQuery:
|
||||
- Zephir:
|
||||
- Template Languages:
|
||||
- Cheetah:
|
||||
- Django:
|
||||
- ERB:
|
||||
- Genshi:
|
||||
- Jinja:
|
||||
- JSP:
|
||||
- Mako:
|
||||
- Myghty:
|
||||
- Smarty:
|
||||
- Tea:
|
||||
- Configuration Markup:
|
||||
- ApacheConf:
|
||||
- INI-style: ini
|
||||
- Lighttpd:
|
||||
- Nginx:
|
||||
- Other Markups:
|
||||
- BBCode:
|
||||
- CMake:
|
||||
- CSS:
|
||||
- Debian control file: control
|
||||
- Diff:
|
||||
- DTD:
|
||||
- Gettext Catalogs: pot
|
||||
- Gnuplot:
|
||||
- Groff:
|
||||
- HTML:
|
||||
- HTTP Session: http
|
||||
- IRC log (irssi-format): irc
|
||||
- Makefile:
|
||||
- MoinMoin/Trac wiki markup: moin
|
||||
- MySQL:
|
||||
- POV-Ray Scenes: pov
|
||||
- Ragel:
|
||||
- Redcode:
|
||||
- ReST:
|
||||
- SQL:
|
||||
- PostgreSQL: psql
|
||||
- SQLite:
|
||||
- Squid Configuration: squid
|
||||
- TeX:
|
||||
- tcsh:
|
||||
- VimScript: vim
|
||||
- Windows Batch Script: bat
|
||||
- XML:
|
||||
- XSLT:
|
||||
- YAML:
|
||||
|
|
@ -0,0 +1,9 @@
|
|||
CREATE TABLE posts (
|
||||
id TEXT PRIMARY KEY NOT NULL,
|
||||
ts TIMESTAMP DEFAULT CURRENT_TIMESTAMP NOT NULL, /* Created timestamp */
|
||||
expiration TIMESTAMP, /* Created timestamp */
|
||||
language TEXT NOT NULL, /* Language (if detected) */
|
||||
title TEXT, /* Title/Filename */
|
||||
code BLOB NOT NULL, /* Code */
|
||||
html BLOB /* HTML version of Code */
|
||||
);
|
||||
|
|
@ -0,0 +1,96 @@
|
|||
package App::WerePaste;
|
||||
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
use App::WerePaste::Util::PygmentsBridge qw/:all/;
|
||||
use Dancer2;
|
||||
use Dancer2::Plugin::DBIC qw/schema/;
|
||||
use DateTime;
|
||||
use Data::UUID;
|
||||
|
||||
my $lastexpunge = 0;
|
||||
|
||||
sub DeploySchema {
|
||||
# need to find a way to handle this that doesn't shit errors everywhere
|
||||
eval {schema->deploy};
|
||||
}
|
||||
sub DateTimeToQueryable {
|
||||
my $dt = DateTime->now(time_zone => config->{tz});
|
||||
$dt->add(@_) if scalar @_;
|
||||
return schema->storage->datetime_parser->format_datetime($dt);
|
||||
}
|
||||
sub ExpirationToDate {
|
||||
my $expire = shift;
|
||||
$expire = $expire ? { split ':', $expire } : undef;
|
||||
return undef if $expire and $expire->{never};
|
||||
return DateTimeToQueryable(%{ $expire || config->{default_expire} });
|
||||
}
|
||||
sub GetUUID {
|
||||
my $uuid = Data::UUID->new->create_str;
|
||||
$uuid =~ s/\-//g;
|
||||
return lc $uuid;
|
||||
}
|
||||
sub CheckExpired {
|
||||
return unless time > ($lastexpunge+900); #expunge once every 15 mins
|
||||
$lastexpunge = time;
|
||||
schema->resultset('Paste')->search({ expiration => [undef, { '<' => DateTimeToQueryable() }]})->delete_all;
|
||||
}
|
||||
sub ValidateParams {
|
||||
my $params = shift;
|
||||
if($params->{id}) {
|
||||
return undef unless lc($params->{id}) =~ /^[a-f0-9]*$/;
|
||||
return 1;
|
||||
}
|
||||
return undef unless $params->{code};
|
||||
return undef unless $params->{title} =~ /^[a-zA-Z0-9\.\-_ @\(\)]{0,255}$/;
|
||||
return undef unless $params->{lang} =~ /^[a-z0-9\.\-\+# ]{0,40}$/;
|
||||
return undef unless $params->{expiration} =~ /^([a-z]+:[0-9]+)(,[a-z]+:[0-9]+)*$/ or not $params->{expiration};
|
||||
return 1;
|
||||
}
|
||||
sub GetPaste {
|
||||
my $id = shift;
|
||||
return schema->resultset('Paste')->single({ id => $id }) or return undef;
|
||||
}
|
||||
sub SubmitPaste {
|
||||
my $params = shift;
|
||||
my ($lang,$html) = PygmentsHighlight(lang => $params->{lang}, code => $params->{code});
|
||||
my $id = GetUUID();
|
||||
my $result = schema->resultset('Paste')->create({
|
||||
id => $id,
|
||||
title => $params->{title},
|
||||
language => $lang,
|
||||
expiration => ExpirationToDate($params->{expiration}),
|
||||
code => $params->{code},
|
||||
html => $html,
|
||||
}) or return undef;
|
||||
return $id;
|
||||
}
|
||||
sub ValidateAndGet {
|
||||
my $params = shift;
|
||||
ValidateParams($params) or return undef;
|
||||
return GetPaste(lc $params->{id}) or return undef;
|
||||
}
|
||||
|
||||
# Startup
|
||||
DeploySchema();
|
||||
# Hooks
|
||||
hook 'before' => sub { CheckExpired(); };
|
||||
# Routes
|
||||
#get
|
||||
get '/' => sub { template 'index.tt'; };
|
||||
get '/:id' => sub { my $paste=ValidateAndGet(scalar params('route')) or pass; template 'show.tt', { paste => $paste };};
|
||||
get '/:id/copy' => sub { my $paste=ValidateAndGet(scalar params('route')) or pass; template 'index.tt', { paste => $paste }; };
|
||||
get '/:id/raw' => sub { my $paste=ValidateAndGet(scalar params('route')) or pass; content_type 'text/plain'; return $paste->code; };
|
||||
#post
|
||||
post '/' => sub {
|
||||
my $p = params('body');
|
||||
ValidateParams($p) or return send_error('Submitted paste is not valid. Check your post title and language, and try again.',400);
|
||||
my $id = SubmitPaste($p) or return redirect '/503.html';
|
||||
return redirect "/$id";
|
||||
};
|
||||
#default
|
||||
any qr/.*/ => sub { return send_error('Page gone',404); };
|
||||
|
||||
1;
|
||||
__END__
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
package App::WerePaste::Schema;
|
||||
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
use base 'DBIx::Class::Schema';
|
||||
|
||||
__PACKAGE__->load_namespaces;
|
||||
|
||||
1;
|
||||
__END__
|
||||
|
|
@ -0,0 +1,28 @@
|
|||
package App::WerePaste::Schema::Result::Paste;
|
||||
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
use base 'DBIx::Class::Core';
|
||||
|
||||
__PACKAGE__->table("pastes");
|
||||
__PACKAGE__->add_columns(
|
||||
'id', { data_type => 'text', is_nullable => 0 },
|
||||
'ts', { data_type => 'timestamp', default_value => \"current_timestamp", is_nullable => 0 },
|
||||
'expiration', { data_type => 'timestamp', is_nullable => 1 },
|
||||
'language', { data_type => 'text', is_nullable => 0 },
|
||||
'title', { data_type => 'text', is_nullable => 1 },
|
||||
'code', { data_type => 'blob', is_nullable => 0 },
|
||||
'html', { data_type => 'blob', is_nullable => 1 },
|
||||
);
|
||||
__PACKAGE__->set_primary_key('id');
|
||||
|
||||
use Dancer2;
|
||||
__PACKAGE__->load_components(qw/InflateColumn::DateTime/);
|
||||
__PACKAGE__->add_columns(
|
||||
'+ts' => { timezone => config->{tz}, locale => config->{locale} },
|
||||
'+expiration' => { timezone => config->{tz}, locale => config->{locale}, formatter => 'DateTime::Formatter::MySQL' }
|
||||
);
|
||||
|
||||
1;
|
||||
__END__
|
||||
|
|
@ -0,0 +1,52 @@
|
|||
package App::WerePaste::Util::PygmentsBridge;
|
||||
|
||||
use strict;
|
||||
use Exporter;
|
||||
use vars qw/$VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS/;
|
||||
|
||||
use Carp;
|
||||
|
||||
use Encode qw/decode_utf8/;
|
||||
use Try::Tiny;
|
||||
|
||||
use Inline Python => <<'END_INLINE_PYTHON';
|
||||
from pygments import highlight
|
||||
from pygments.lexers import guess_lexer, get_lexer_by_name
|
||||
from pygments.formatters import HtmlFormatter
|
||||
|
||||
def py_highlight(c,l):
|
||||
return highlight(c,l,HtmlFormatter(linenos=True,anchorlinenos=True,lineanchors="L",linenospecial=10,linespans="L",encoding="utf-8"))
|
||||
|
||||
def py_guesslexer(c):
|
||||
return guess_lexer(c,encoding="utf-8")
|
||||
|
||||
def py_getlexer(l):
|
||||
return get_lexer_by_name(l,encoding="utf-8")
|
||||
|
||||
def py_getnamefromlexer(l):
|
||||
return l.name
|
||||
|
||||
END_INLINE_PYTHON
|
||||
|
||||
$VERSION = 1.0.0;
|
||||
@ISA = qw/Exporter/;
|
||||
@EXPORT = qw//;
|
||||
@EXPORT_OK = qw/PygmentsHighlight/;
|
||||
%EXPORT_TAGS = (all => [@EXPORT_OK]);
|
||||
|
||||
sub PygmentsHighlight {
|
||||
my (%params) = @_;
|
||||
return unless $params{code};
|
||||
my $lexer;
|
||||
try {
|
||||
$lexer = py_getlexer($params{lang}) if $params{lang};
|
||||
} catch {};
|
||||
try {
|
||||
$lexer = py_guesslexer($params{code}) unless $lexer;
|
||||
} catch {};
|
||||
$lexer = py_getlexer('text') unless $lexer;
|
||||
return (py_getnamefromlexer($lexer),decode_utf8(py_highlight($params{code},$lexer)));
|
||||
}
|
||||
|
||||
1;
|
||||
__END__
|
||||
|
|
@ -0,0 +1,26 @@
|
|||
/* http://meyerweb.com/eric/tools/css/reset/
|
||||
v2.0 | 20110126
|
||||
License: none (public domain)
|
||||
*/
|
||||
|
||||
html, body, div, span, applet, object, iframe,
|
||||
h1, h2, h3, h4, h5, h6, p, blockquote, pre,
|
||||
a, abbr, acronym, address, big, cite, code,
|
||||
del, dfn, em, img, ins, kbd, q, s, samp,
|
||||
small, strike, strong, sub, sup, tt, var,
|
||||
b, u, i, center,
|
||||
dl, dt, dd, ol, ul, li,
|
||||
fieldset, form, label, legend,
|
||||
table, caption, tbody, tfoot, thead, tr, th, td,
|
||||
article, aside, canvas, details, embed,
|
||||
figure, figcaption, footer, header, hgroup,
|
||||
menu, nav, output, ruby, section, summary,
|
||||
time, mark, audio, video {
|
||||
margin: 0;
|
||||
padding: 0;
|
||||
border: 0;
|
||||
font-size: 100%;
|
||||
font: inherit;
|
||||
vertical-align: baseline;
|
||||
}
|
||||
|
||||
|
|
@ -0,0 +1,87 @@
|
|||
/* Solarized Dark
|
||||
|
||||
For use with Jekyll and Pygments
|
||||
|
||||
http://ethanschoonover.com/solarized
|
||||
|
||||
SOLARIZED HEX ROLE
|
||||
--------- -------- ------------------------------------------
|
||||
base03 #002b36 background
|
||||
base01 #586e75 comments / secondary content
|
||||
base1 #93a1a1 body text / default code / primary content
|
||||
orange #cb4b16 constants
|
||||
red #dc322f regex, special keywords
|
||||
blue #268bd2 reserved keywords
|
||||
cyan #2aa198 strings, numbers
|
||||
green #859900 operators, other keywords
|
||||
*/
|
||||
|
||||
.paste { background-color: #002b36; color: #93a1a1 }
|
||||
.paste .c { color: #586e75 } /* Comment */
|
||||
.paste .err { color: #93a1a1 } /* Error */
|
||||
.paste .g { color: #93a1a1 } /* Generic */
|
||||
.paste .k { color: #859900 } /* Keyword */
|
||||
.paste .l { color: #93a1a1 } /* Literal */
|
||||
.paste .n { color: #93a1a1 } /* Name */
|
||||
.paste .o { color: #859900 } /* Operator */
|
||||
.paste .x { color: #cb4b16 } /* Other */
|
||||
.paste .p { color: #93a1a1 } /* Punctuation */
|
||||
.paste .cm { color: #586e75 } /* Comment.Multiline */
|
||||
.paste .cp { color: #859900 } /* Comment.Preproc */
|
||||
.paste .c1 { color: #586e75 } /* Comment.Single */
|
||||
.paste .cs { color: #859900 } /* Comment.Special */
|
||||
.paste .gd { color: #2aa198 } /* Generic.Deleted */
|
||||
.paste .ge { color: #93a1a1; font-style: italic } /* Generic.Emph */
|
||||
.paste .gr { color: #dc322f } /* Generic.Error */
|
||||
.paste .gh { color: #cb4b16 } /* Generic.Heading */
|
||||
.paste .gi { color: #859900 } /* Generic.Inserted */
|
||||
.paste .go { color: #93a1a1 } /* Generic.Output */
|
||||
.paste .gp { color: #93a1a1 } /* Generic.Prompt */
|
||||
.paste .gs { color: #93a1a1; font-weight: bold } /* Generic.Strong */
|
||||
.paste .gu { color: #cb4b16 } /* Generic.Subheading */
|
||||
.paste .gt { color: #93a1a1 } /* Generic.Traceback */
|
||||
.paste .kc { color: #cb4b16 } /* Keyword.Constant */
|
||||
.paste .kd { color: #268bd2 } /* Keyword.Declaration */
|
||||
.paste .kn { color: #859900 } /* Keyword.Namespace */
|
||||
.paste .kp { color: #859900 } /* Keyword.Pseudo */
|
||||
.paste .kr { color: #268bd2 } /* Keyword.Reserved */
|
||||
.paste .kt { color: #dc322f } /* Keyword.Type */
|
||||
.paste .ld { color: #93a1a1 } /* Literal.Date */
|
||||
.paste .m { color: #2aa198 } /* Literal.Number */
|
||||
.paste .s { color: #2aa198 } /* Literal.String */
|
||||
.paste .na { color: #93a1a1 } /* Name.Attribute */
|
||||
.paste .nb { color: #B58900 } /* Name.Builtin */
|
||||
.paste .nc { color: #268bd2 } /* Name.Class */
|
||||
.paste .no { color: #cb4b16 } /* Name.Constant */
|
||||
.paste .nd { color: #268bd2 } /* Name.Decorator */
|
||||
.paste .ni { color: #cb4b16 } /* Name.Entity */
|
||||
.paste .ne { color: #cb4b16 } /* Name.Exception */
|
||||
.paste .nf { color: #268bd2 } /* Name.Function */
|
||||
.paste .nl { color: #93a1a1 } /* Name.Label */
|
||||
.paste .nn { color: #93a1a1 } /* Name.Namespace */
|
||||
.paste .nx { color: #93a1a1 } /* Name.Other */
|
||||
.paste .py { color: #93a1a1 } /* Name.Property */
|
||||
.paste .nt { color: #268bd2 } /* Name.Tag */
|
||||
.paste .nv { color: #268bd2 } /* Name.Variable */
|
||||
.paste .ow { color: #859900 } /* Operator.Word */
|
||||
.paste .w { color: #93a1a1 } /* Text.Whitespace */
|
||||
.paste .mf { color: #2aa198 } /* Literal.Number.Float */
|
||||
.paste .mh { color: #2aa198 } /* Literal.Number.Hex */
|
||||
.paste .mi { color: #2aa198 } /* Literal.Number.Integer */
|
||||
.paste .mo { color: #2aa198 } /* Literal.Number.Oct */
|
||||
.paste .sb { color: #586e75 } /* Literal.String.Backtick */
|
||||
.paste .sc { color: #2aa198 } /* Literal.String.Char */
|
||||
.paste .sd { color: #93a1a1 } /* Literal.String.Doc */
|
||||
.paste .s2 { color: #2aa198 } /* Literal.String.Double */
|
||||
.paste .se { color: #cb4b16 } /* Literal.String.Escape */
|
||||
.paste .sh { color: #93a1a1 } /* Literal.String.Heredoc */
|
||||
.paste .si { color: #2aa198 } /* Literal.String.Interpol */
|
||||
.paste .sx { color: #2aa198 } /* Literal.String.Other */
|
||||
.paste .sr { color: #dc322f } /* Literal.String.Regex */
|
||||
.paste .s1 { color: #2aa198 } /* Literal.String.Single */
|
||||
.paste .ss { color: #2aa198 } /* Literal.String.Symbol */
|
||||
.paste .bp { color: #268bd2 } /* Name.Builtin.Pseudo */
|
||||
.paste .vc { color: #268bd2 } /* Name.Variable.Class */
|
||||
.paste .vg { color: #268bd2 } /* Name.Variable.Global */
|
||||
.paste .vi { color: #268bd2 } /* Name.Variable.Instance */
|
||||
.paste .il { color: #2aa198 } /* Literal.Number.Integer.Long */
|
||||
|
|
@ -0,0 +1,62 @@
|
|||
@charset "UTF-8";
|
||||
|
||||
body {
|
||||
font-family: 'lucida console', monospace;
|
||||
font-size: 11px;
|
||||
background:#002b36;
|
||||
color: #586e75;
|
||||
}
|
||||
|
||||
textarea {
|
||||
font-size: 12px;
|
||||
font-family: 'lucida console', monospace;
|
||||
padding: 0;
|
||||
border: none;
|
||||
border-top: 1px solid #335e69;
|
||||
border-bottom: 1px solid #335e69;
|
||||
background:#113c47;
|
||||
color: #93a1a1;
|
||||
width: 100%;
|
||||
}
|
||||
|
||||
h1 {
|
||||
font-size: 1.4em;
|
||||
}
|
||||
a, a:hover, a:visited, a:focus {
|
||||
text-decoration: none;
|
||||
color: #ccf;
|
||||
}
|
||||
.highlighttable {
|
||||
font-size: 12px;
|
||||
line-height: 14px;
|
||||
width: 100%;
|
||||
border-spacing: 0;
|
||||
}
|
||||
td {
|
||||
border: 2px solid #335e69;
|
||||
padding: 2px 0;
|
||||
}
|
||||
td.code {
|
||||
width: 100%;
|
||||
border-right: none;
|
||||
border-left: 1px solid #335e69;
|
||||
}
|
||||
td.linenos {
|
||||
border-left: none;
|
||||
border-right: 1px solid #335e69;
|
||||
}
|
||||
td.linenos > .linenodiv > pre > a {
|
||||
display: inline-block;
|
||||
padding-top: 2px;
|
||||
}
|
||||
.highlight > pre > span {
|
||||
display: block;
|
||||
width: 100%;
|
||||
padding-top: 2px;
|
||||
}
|
||||
.highlight > pre > span:hover {
|
||||
background-color: #113c47;
|
||||
}
|
||||
.selected {
|
||||
background-color: #335e69;
|
||||
}
|
||||
|
|
@ -0,0 +1,5 @@
|
|||
#!/usr/bin/env sh
|
||||
[ -z "$APP" ] && exit 1
|
||||
cd /home/sites/$APP
|
||||
pkill -F /home/sites/$APP.pid 2>/dev/null
|
||||
plackup -s Starman -D -p 12080 ./bin/app.pl --pid /home/sites/$APP.pid
|
||||
|
|
@ -0,0 +1,30 @@
|
|||
<form action="/" method="POST">
|
||||
<input type="text" name="title" placeholder="Title (optional)" value="[% paste.title %]" size="40" maxlength="255" />
|
||||
<select class="language" name="lang" style="float: right">
|
||||
<option value="" [% 'selected' UNLESS paste.language %]>Language: Auto</option>
|
||||
<option value="text" [% 'selected' IF paste.language == 'text' %]>Text</option>
|
||||
[% FOR group = settings.languages %]
|
||||
<optgroup label="[% group.keys.0 %]">
|
||||
[% FOR lang = group.values.0 %]
|
||||
[% val = (lang.values.0 || lang.keys.0) | lower %]
|
||||
<option value="[% val | lower %]" [% 'selected' IF paste.language == "${val}" %]>[% lang.keys.0 %]</option>
|
||||
[% END %]
|
||||
</optgroup>
|
||||
[% END %]
|
||||
</select>
|
||||
<br />
|
||||
<textarea name="code" rows="32">[% paste.code %]</textarea>
|
||||
<br />
|
||||
<div style='float: right'>
|
||||
<select class="expiration" name="expiration">
|
||||
<option value="hours:1" >Expire 1 hour from now</option>
|
||||
<option value="hours:6" >Expire 6 hours from now</option>
|
||||
<option value="days:1" >Expire 1 day from now</option>
|
||||
<option value="weeks:1" >Expire 1 week from now</option>
|
||||
<option value="months:1">Expire 1 month from now</option>
|
||||
<option value="years:1" >Expire 1 year from now</option>
|
||||
<option value="never:1" selected>Never expire</option>
|
||||
</select>
|
||||
<button type="submit">Save</button>
|
||||
</div>
|
||||
</form>
|
||||
|
|
@ -0,0 +1,19 @@
|
|||
<!doctype html>
|
||||
<html>
|
||||
<head>
|
||||
<title>[% IF paste %][% paste.title || paste.id %] - [% END %]paste.were.space</title>
|
||||
<link rel="stylesheet" href="/reset.css" type="text/css"/>
|
||||
<link rel="stylesheet" href="/style.css" type="text/css"/>
|
||||
<link rel="stylesheet" href="/solarized256.css" type="text/css"/>
|
||||
<script src="//cdnjs.cloudflare.com/ajax/libs/jquery/1.9.0/jquery.min.js"></script>
|
||||
</head>
|
||||
<body>
|
||||
<div id='nav'>
|
||||
<a href="/">new paste</a>[% IF paste %] | <a href="/[% paste.id %]/copy">duplicate paste</a> | <a href="/[% paste.id %]/raw">raw paste data</a>[% END %] | v4: <span id='addr'></span> | v6: <span id='addr6'></span><br />
|
||||
<span id='blurb'><a href="https://github.com/MaffC/WerePaste">App::WerePaste</a>. Abuse of this service will result in the innocent losing out.</span>
|
||||
</div>
|
||||
<br />
|
||||
[% content %]
|
||||
<script type='text/javascript'>var x4=x6=null;function ip(v){var x=new XMLHttpRequest();x.onreadystatechange=rt;x.open('GET','http://ip'+v+'.maff.scot/',true);x.send(null);v==6? x6=x : x4=x;};function rt(){if(x4!=null&&x4.status===200){document.getElementById('addr').textContent=x4.responseText;};if(x6!=null&&x6.status===200){document.getElementById('addr6').textContent=x6.responseText;}};ip(4);ip(6);</script>
|
||||
</body>
|
||||
</html>
|
||||
|
|
@ -0,0 +1,27 @@
|
|||
<h1>[% paste.title %]</h1>
|
||||
<span id='dates'>Pasted at <b>[% paste.ts.hms %], [% paste.ts.dmy %]</b>
|
||||
[% IF paste.expiration %] | Expires at <b>[% paste.expiration.hms %], [% paste.expiration.dmy %]</b>[% END %] | Language: [% paste.language %]</span>
|
||||
<br />
|
||||
<br />
|
||||
<div class="paste">
|
||||
[% IF paste.html %]
|
||||
[% paste.html %]
|
||||
[% ELSE %]
|
||||
<pre>[% paste.code %]</pre>
|
||||
[% END %]
|
||||
</div>
|
||||
|
||||
<script type="text/javascript">
|
||||
function highlight_line() {
|
||||
var lnum = window.location.hash.match(/L-\d+/);
|
||||
if(!lnum) { return; }
|
||||
$('.linenos a').removeClass('selected');
|
||||
$('.highlight span').removeClass('selected');
|
||||
$('.linenos a[href="#'+lnum+'"]').addClass('selected');
|
||||
$('.highlight span[id="'+lnum+'"]').addClass('selected');
|
||||
}
|
||||
$(document).ready(function() {
|
||||
window.onhashchange = highlight_line;
|
||||
if(location.hash.indexOf("#L")===0){highlight_line();}
|
||||
});
|
||||
</script>
|
||||
Loading…
Reference in New Issue