From 09d7c955d907bf09c5a63c85d2f0c6d7e47ad6ea Mon Sep 17 00:00:00 2001
From: Florian Pritz <bluewind@xinu.at>
Date: Thu, 10 Sep 2015 12:02:58 +0200
Subject: misc

Signed-off-by: Florian Pritz <bluewind@xinu.at>
---
 jabberwall.pl         |  2 +-
 newpgdb               |  7 +++++++
 update-mirrorlist-pkg | 16 ++++++++++++++++
 vpn-getpass           |  3 +++
 zfs-backup.sh         |  6 +++---
 5 files changed, 30 insertions(+), 4 deletions(-)
 create mode 100755 newpgdb
 create mode 100755 update-mirrorlist-pkg
 create mode 100755 vpn-getpass

diff --git a/jabberwall.pl b/jabberwall.pl
index 23267ef..2e6552c 100755
--- a/jabberwall.pl
+++ b/jabberwall.pl
@@ -24,7 +24,7 @@ Config::Simple->import_from("$ENV{HOME}/.jabberwallrc", \%config);
 
 my $clnt = new Net::Jabber::Client;
 
-my $status = $clnt->Connect(hostname=>$config{server}, port=>$config{port}, tls=>1);
+my $status = $clnt->Connect(hostname=>$config{server}, port=>$config{port}, tls=>1, ssl_ca_path=>"/etc/ssl/certs/ca-certificates.crt");
 
 if (!defined($status)) {
   die "Jabber connect error ($!)\n";
diff --git a/newpgdb b/newpgdb
new file mode 100755
index 0000000..adbd3e1
--- /dev/null
+++ b/newpgdb
@@ -0,0 +1,7 @@
+#!/bin/bash
+
+cat <<CMD | psql
+create database $2;
+create role $2;
+grant $2 to $1;
+CMD
diff --git a/update-mirrorlist-pkg b/update-mirrorlist-pkg
new file mode 100755
index 0000000..52be575
--- /dev/null
+++ b/update-mirrorlist-pkg
@@ -0,0 +1,16 @@
+#!/bin/bash
+
+set -e
+
+cd ~/arch/extra/pacman-mirrorlist/
+svn up
+cd trunk
+
+upgpkg a
+svn diff mirrorlist | pygmentize
+printf "confirm update (enter)"
+read
+makepkg -fc
+
+corepkg "upstream update"
+dbrel
diff --git a/vpn-getpass b/vpn-getpass
new file mode 100755
index 0000000..de98aed
--- /dev/null
+++ b/vpn-getpass
@@ -0,0 +1,3 @@
+#!/bin/bash
+
+exec getpw-single tuwien zid
diff --git a/zfs-backup.sh b/zfs-backup.sh
index 733c570..aeb4e38 100755
--- a/zfs-backup.sh
+++ b/zfs-backup.sh
@@ -57,9 +57,9 @@ create_snapshots() {
 clean_snapshots() {
 	local dst_fs=$1
 
-	/root/zfs_snapshot_cleanup.sh "$dst_fs" daily 10
-	/root/zfs_snapshot_cleanup.sh "$dst_fs" weekly 4
-	/root/zfs_snapshot_cleanup.sh "$dst_fs" monthly 3
+	/root/zfs_snapshot_cleanup.sh "$dst_fs" daily 14
+	/root/zfs_snapshot_cleanup.sh "$dst_fs" weekly 6
+	/root/zfs_snapshot_cleanup.sh "$dst_fs" monthly 4
 }
 
 create_and_clean_snapshots() {
-- 
cgit v1.2.3-24-g4f1b