Browse files

remove unused cronjobs

  • Loading branch information...
1 parent 36b6404 commit cfa755d6ed0422d63b5cd721427c7d1871ec1ccb Andreas Koenig committed Jan 3, 2013
View
2 cron/recentfile-aggregate.sh
@@ -1,5 +1,5 @@
#!/bin/sh
-export PATH=/usr/local/perl/bin:$PATH
+export PATH=/opt/perl/current/bin:/usr/local/perl/bin:$PATH
rrr-aggregate /home/ftp/pub/PAUSE/authors/RECENT-1h.yaml
rrr-aggregate /home/ftp/pub/PAUSE/modules/RECENT-1h.yaml
View
3 cron/restart-httpd
@@ -1,4 +1,7 @@
#!/usr/bin/perl
+
+# scheduled for demise as soon as the pause2.develooper.com has taken over
+
use strict;
our $D;
{
View
13 cron/run_mirrors.sh
@@ -1,3 +1,14 @@
#!/bin/sh
-perl /usr/bin/mirror -C/home/k/PAUSE/mirror/mirror.defaults /home/k/PAUSE/mirror/mymirror.config
+if [ -d /home/puppet/pause/mirror ] ; then
+ MIRRDIR=/home/puppet/pause/mirror
+ MIRRCNF=mirror.defaults-pause-us
+elif [ -d /home/k/PAUSE/mirror ] ; then
+ MIRRDIR=/home/k/PAUSE/mirror
+ MIRRCNF=mirror.defaults
+else
+ echo could not find MIRRDIR
+ exit 1
+fi
+
+perl /usr/bin/mirror -C$MIRRDIR/$MIRRCNF $MIRRDIR/mymirror.config
View
9 cron/session-backup.zsh
@@ -1,9 +0,0 @@
-#!/usr/bin/zsh
-
-set -e
-cd /usr/local/apache/rundata/pause_1999/
-ls -laR session > session-repo/ls-laR.txt
-rsync -va session/ session-repo/ > session-repo/rsync.log
-cd session-repo
-git add **/*(.)
-git commit -m backup
View
47 cron/storaway-one-per-datepat.pl
@@ -1,47 +0,0 @@
-#!/usr/bin/perl
-
-=pod
-
-Usage: $0 /home/k/pause/111_sensitive/backup 'authen_pausedump\.(\d\d\d\d)(\d\d)\d+GMT\.bz2'
-
-=cut
-
-use strict;
-use warnings;
-
-my($dir,$fpat) = @ARGV;
-die "Usage..." unless $fpat;
-die "Did not find dir[$dir]" unless -d $dir;
-my($qr) = qr($fpat);
-my $parens = $fpat =~ tr/(//;
-die "Found no opening braces in fpat[$fpat]" unless $parens;
-opendir my $dh, $dir or die "Could not opendir '$dir': $!";
-my $collect = {};
-my $rm = {};
-for my $de (readdir $dh) {
- my @catch = $de =~ $qr;
- next unless scalar @catch == $parens;
- local $" = "/";
- $collect->{"@catch"} ||= "";
- if ($collect->{"@catch"}) {
- if ($collect->{"@catch"} gt $de) {
- $rm->{"@catch"}{$collect->{"@catch"}} = undef;
- $collect->{"@catch"} = $de;
- } else {
- $rm->{"@catch"}{$de} = undef;
- }
- } else {
- $collect->{"@catch"} = $de;
- }
-}
-my @keys = sort keys %$collect;
-pop @keys;
-for my $k (@keys) {
- print qq{
-mkdir -p $dir/$k
-mv -iv $dir/$collect->{$k} $dir/$k/$collect->{$k}
-};
- for my $de (keys %{$rm->{$k}}) {
- print "rm $dir/$de\n";
- }
-}
View
7 cron/sync-04pause.sh
@@ -1,7 +0,0 @@
-#!/bin/zsh
-
-set -e
-
-# set -x
-
-rsync -a ~k/pause/htdocs/0*.html ~ftp/pub/PAUSE/modules/
View
7 cron/sync-incoming.sh
@@ -1,7 +0,0 @@
-#!/bin/zsh
-
-set -e
-
-# set -x
-
-/usr/local/bin/rsync -a ~k/pause/ftpd/messages/incoming.txt ~ftp/incoming/.message

0 comments on commit cfa755d

Please sign in to comment.