Remove some very outdated / ununused scripts
This commit is contained in:
Nico Schottelius
parent
585f9cd271
commit
406bd43f4a
|
|
@ -1,3 +0,0 @@
|
|||
/root/scripts/add-links "$1"
|
||||
/root/scripts/rekursivperms "$1"
|
||||
chown -R .util "$1"
|
||||
|
|
@ -1,80 +0,0 @@
|
|||
BASEDIR=/home/server/www/org/wddb/www/
|
||||
tmp=/tmp/wddb-$$
|
||||
|
||||
function report()
|
||||
{
|
||||
# sender
|
||||
UFLINE
|
||||
|
||||
# return path
|
||||
RPLINE
|
||||
|
||||
# we
|
||||
RECIPIENT
|
||||
|
||||
# delivered to..
|
||||
DTLINE
|
||||
# set
|
||||
}
|
||||
|
||||
function init()
|
||||
{
|
||||
cat > $tmp
|
||||
|
||||
|
||||
}
|
||||
|
||||
# continent
|
||||
continent=`grep "^continent" "$1" | sed 's/.*="\(.*\)"/\1/'`
|
||||
|
||||
case "$continent" in
|
||||
africa|asia|australia|europe|northamerica|southamerica) ;;
|
||||
*) report "Allowed continents: africa|asia|australia|europe|northamerica|southamerica" ;;
|
||||
esac
|
||||
|
||||
# other vars
|
||||
essid=`grep "^essid" "$1" | sed 's/.*="\(.*\)"/\1/'`
|
||||
|
||||
# remove possible dots
|
||||
country=`grep "^country" "$1" | sed 's/.*="\(.*\)"/\1/' | sed 's/\.\.//g'`
|
||||
area=`grep "^area" "$1" | sed 's/.*="\(.*\)"/\1/' | sed 's/\//-/g' | sed 's/ //c'`
|
||||
mac=`grep "^mac" "$1" | sed 's/.*="\(.*\)"/\1/'`
|
||||
rate=`grep "^rate" "$1" | sed 's/.*="\(.*\)"/\1/'`
|
||||
wep=`grep "^wep" "$1" | sed 's/.*="\(.*\)"/\1/'`
|
||||
hints=`grep "^hints" "$1" | sed 's/.*="\(.*\)"/\1/'`
|
||||
location=`grep "^location" "$1" | sed 's/.*="\(.*\)"/\1/'`
|
||||
|
||||
# check for empty fields
|
||||
for a in essid country area mac rate wep hints location; do
|
||||
eval tmp="\$$a"
|
||||
if [ -z "$tmp" ]; then
|
||||
report "Empty field: $a"
|
||||
fi
|
||||
done
|
||||
|
||||
if [ ! -f $BASEDIR/$continent/$country/$area.html ]; then
|
||||
cat << EOF > "$1"
|
||||
<html>
|
||||
<head>
|
||||
<title>wddb.org - WarDriver's DataBase</title>
|
||||
</head>
|
||||
|
||||
<BODY bgcolor="#000000" color="#ef0000" font-color="#ef0000">
|
||||
<FONT COLOR="#ef0000">
|
||||
|
||||
else
|
||||
lines=`cat "$BASEDIR/$continent/$country/$area.html" | wc |awk '{ print $1 }'`
|
||||
use_lines=$[$lines-7]
|
||||
head -n $use_lines "$BASEDIR/$continent/$country/$area.html" > "$1"
|
||||
|
||||
fi
|
||||
|
||||
cat << EOF >> "$1"
|
||||
</TABLE>
|
||||
<HR>
|
||||
<A HREF="../index.html"> << One step back</A>
|
||||
<P><A HREF="/submit-new.html">Submit new network or changes<A>
|
||||
</FONT>
|
||||
</BODY>
|
||||
</HTML>
|
||||
EOF
|
||||
|
|
@ -1,3 +0,0 @@
|
|||
modprobe usb-storage
|
||||
modprobe ohci-hcd
|
||||
modprobe sd_mod
|
||||
153
attach
153
attach
|
|
@ -1,153 +0,0 @@
|
|||
#!/usr/bin/perl -wT
|
||||
#
|
||||
# TWiki Collaboration Platform, http://TWiki.org/
|
||||
#
|
||||
# Copyright (C) 1999-2003 Peter Thoeny, peter@thoeny.com
|
||||
#
|
||||
# For licensing info read license.txt file in the TWiki root.
|
||||
# This program 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 2
|
||||
# of the License, or (at your option) any later version.
|
||||
#
|
||||
# This program 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, published at
|
||||
# http://www.gnu.org/copyleft/gpl.html
|
||||
|
||||
# Set library paths in @INC, at compile time
|
||||
BEGIN { unshift @INC, '.'; require 'setlib.cfg'; }
|
||||
|
||||
use CGI::Carp qw( fatalsToBrowser );
|
||||
use CGI;
|
||||
use TWiki;
|
||||
|
||||
use strict;
|
||||
|
||||
#open(STDERR,'>&STDOUT'); # redirect error to browser
|
||||
$| = 1; # no buffering
|
||||
|
||||
&main();
|
||||
|
||||
|
||||
# =========================
|
||||
sub listVersions
|
||||
{
|
||||
my( $web, $topic, $attachment ) = @_;
|
||||
|
||||
my $latestRev = TWiki::Store::getRevisionNumber( $web, $topic, $attachment );
|
||||
$latestRev =~ /\.(.*)/;
|
||||
my $maxRevNum = $1;
|
||||
|
||||
my $found = 0;
|
||||
|
||||
my $result = "\n| *Version:* | *Action:* | *Date:* | *Who:* | *Comment:* |\n";
|
||||
|
||||
for( my $version = $maxRevNum; $version >= 1; $version-- ) {
|
||||
|
||||
my $rev = "1.$version";
|
||||
|
||||
my( $date, $userName, $dummy, $comment ) =
|
||||
TWiki::Store::getRevisionInfo( $web, $topic, $rev, "TWiki date", $attachment );
|
||||
my $wikiUserName = &TWiki::userToWikiName( $userName );
|
||||
|
||||
my $viewAction = "<a href=\"%SCRIPTURLPATH%/viewfile%SCRIPTSUFFIX%/%WEB%/%TOPIC%?rev=$rev&filename=$attachment\">view</a>";
|
||||
$result .= "| 1.$version | $viewAction | $date | $wikiUserName | $comment |\n";
|
||||
}
|
||||
|
||||
$result = "$result";
|
||||
return $result;
|
||||
}
|
||||
|
||||
|
||||
# =========================
|
||||
sub main
|
||||
{
|
||||
my $query = new CGI;
|
||||
my $thePathInfo = $query->path_info();
|
||||
my $theRemoteUser = $query->remote_user();
|
||||
my $theTopic = $query->param( 'topic' );
|
||||
my $theUrl = $query->url;
|
||||
|
||||
my( $topic, $webName, $dummy, $userName ) =
|
||||
&TWiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl, $query );
|
||||
$dummy = ""; # to suppress warning
|
||||
|
||||
my $tmpl = "";
|
||||
my $text = "";
|
||||
my $meta = "";
|
||||
my $atext = "";
|
||||
my $fileName = "";
|
||||
my $fileUser = "";
|
||||
my $wikiUserName = &TWiki::userToWikiName( $userName );
|
||||
|
||||
my $isHideChecked = "";
|
||||
|
||||
if( ! &TWiki::Store::webExists( $webName ) ) {
|
||||
my $url = &TWiki::getOopsUrl( $webName, $topic, "oopsnoweb" );
|
||||
TWiki::redirect( $query, $url );
|
||||
return;
|
||||
}
|
||||
|
||||
my( $mirrorSiteName, $mirrorViewURL ) = &TWiki::readOnlyMirrorWeb( $webName );
|
||||
if( $mirrorSiteName ) {
|
||||
my $url = &TWiki::getOopsUrl( $webName, $topic, "oopsmirror", $mirrorSiteName, $mirrorViewURL );
|
||||
TWiki::redirect( $query, $url );
|
||||
return;
|
||||
}
|
||||
|
||||
# check access permission
|
||||
if( ! &TWiki::Access::checkAccessPermission( "change", $wikiUserName, "", $topic, $webName ) ) {
|
||||
my $url = &TWiki::getOopsUrl( $webName, $topic, "oopsaccesschange" );
|
||||
TWiki::redirect( $query, $url );
|
||||
return;
|
||||
}
|
||||
|
||||
$fileName = $query->param( 'filename' ) || "";
|
||||
|
||||
if( &TWiki::Store::topicExists( $webName, $topic ) ) {
|
||||
( $meta, $text ) = &TWiki::Store::readTopic( $webName, $topic );
|
||||
}
|
||||
|
||||
my %args = $meta->findOne( "FILEATTACHMENT", $fileName );
|
||||
%args = ( "attr" => "", "path" => "", "comment" => "" ) if( ! % args );
|
||||
|
||||
if ( $args{"attr"} =~ /h/o ) {
|
||||
$isHideChecked = "checked";
|
||||
}
|
||||
|
||||
if ( $fileName ) {
|
||||
$atext = listVersions( $webName, $topic, $fileName );
|
||||
}
|
||||
|
||||
# why log attach before post is called?
|
||||
# FIXME: Move down, log only if successful (or with error msg?)
|
||||
# Attach is a read function, only has potential for a change
|
||||
if( $TWiki::doLogTopicAttach ) {
|
||||
# write log entry
|
||||
&TWiki::Store::writeLog( "attach", "$webName.$topic", $fileName );
|
||||
}
|
||||
|
||||
my $fileWikiUser = "";
|
||||
my $skin = $query->param( "skin" ) || TWiki::Prefs::getPreferencesValue( "SKIN" );
|
||||
if( $fileName && %args ) {
|
||||
$tmpl = TWiki::Store::readTemplate( "attachagain", $skin );
|
||||
$fileWikiUser = &TWiki::userToWikiName( $args{"user"} );
|
||||
} else {
|
||||
$tmpl = TWiki::Store::readTemplate( "attachnew", $skin );
|
||||
}
|
||||
$tmpl =~ s/%ATTACHTABLE%/$atext/go;
|
||||
$tmpl =~ s/%FILEUSER%/$fileWikiUser/go;
|
||||
$tmpl = &TWiki::handleCommonTags( $tmpl, $topic );
|
||||
$tmpl = &TWiki::getRenderedVersion( $tmpl );
|
||||
$tmpl = &TWiki::handleMetaTags( $webName, $topic, $tmpl, $meta );
|
||||
$tmpl =~ s/%HIDEFILE%/$isHideChecked/go;
|
||||
$tmpl =~ s/%FILENAME%/$fileName/go;
|
||||
$tmpl =~ s/%FILEPATH%/$args{"path"}/go;
|
||||
$tmpl =~ s/%FILECOMMENT%/$args{"comment"}/go;
|
||||
TWiki::writeHeader( $query );
|
||||
print $tmpl;
|
||||
}
|
||||
|
||||
# EOF
|
||||
|
|
@ -1,10 +0,0 @@
|
|||
HOST=eiche
|
||||
DESTDIR=/mnt/datennirvana/backup/bruehe
|
||||
EXCLUDE_FILE=/root/.backup-exclude
|
||||
|
||||
#time rsync -e ssh -av --exclude-from=/root/.backup-exclude / 192.168.23.33:/mnt/backup/bruehe
|
||||
|
||||
time rsync -e ssh -av --exclude-from=$EXCLUDE_FILE / "$HOST":"$DESTDIR"
|
||||
|
||||
#echo "Shutting down $HOST..."
|
||||
#ssh $HOST "shutdown -h now"
|
||||
|
|
@ -1,18 +0,0 @@
|
|||
NEWROOT=/mnt/eiche
|
||||
DATA_DIRS="bin boot etc home lib opt root sbin tmp usr var"
|
||||
SCRIPTS="/root/scripts/to_eiche"
|
||||
|
||||
# display how long we backup
|
||||
date
|
||||
for script in $SCRIPTS; do
|
||||
$script
|
||||
done
|
||||
|
||||
# create empty dirs
|
||||
mkdir -p $NEWROOT/dev $NEWROOT/proc $NEWROOT/mnt
|
||||
for a in /mnt/*; do mkdir -p $NEWROOT/$a; done
|
||||
|
||||
cd /
|
||||
tar cf - $DATA_DIRS | ( cd $NEWROOT; tar xf - )
|
||||
|
||||
date
|
||||
|
|
@ -1,3 +0,0 @@
|
|||
#!/bin/sh
|
||||
|
||||
cat /sys/devices/pci0000:00/0000:00:02.0/drm/card0/card0-eDP-1/intel_backlight/max_brightness | sudo tee /sys/devices/pci0000:00/0000:00:02.0/drm/card0/card0-eDP-1/intel_backlight/brightness
|
||||
|
|
@ -1,30 +0,0 @@
|
|||
|
||||
dev1="/dev/sd$1"; shift
|
||||
dev2="/dev/sd$1"; shift
|
||||
dev3="/dev/sd$1"; shift
|
||||
|
||||
#devs='/dev/sde /dev/sdf /dev/sdg'
|
||||
devs="/dev/sde /dev/sdc /dev/sdd"
|
||||
set -e
|
||||
set -x
|
||||
mdadm --assemble /dev/md0 $dev1 $dev2 $dev3
|
||||
cryptsetup luksOpen /dev/md0 raid
|
||||
fsck /dev/mapper/raid
|
||||
mount /home/services/raid
|
||||
|
||||
exit 0
|
||||
|
||||
#mdadm --assemble /dev/md0 /dev/sde /dev/sdf /dev/sdg
|
||||
#cryptsetup luksOpen /dev/md0 raid
|
||||
|
||||
[19:25] denkbrett:~nico# mdadm --assemble --scan
|
||||
/dev/md0: File exists
|
||||
mdadm: /dev/md/0 has been started with 2 drives (out of 3).
|
||||
mdadm: /dev/md/0 already active, cannot restart it!
|
||||
mdadm: /dev/md/0 needed for /dev/sdc...
|
||||
mdadm: /dev/md/0 already active, cannot restart it!
|
||||
mdadm: /dev/md/0 needed for /dev/sdc...
|
||||
[19:25] denkbrett:~nico# mdadm --manage -a /dev/md0 /dev/sdc
|
||||
mdadm: re-added /dev/sdc
|
||||
[19:25] denkbrett:~nico#
|
||||
|
||||
|
|
@ -1,2 +0,0 @@
|
|||
cryptsetup luksClose raid
|
||||
mdadm --misc --stop /dev/md0
|
||||
|
|
@ -1,13 +0,0 @@
|
|||
#!/bin/sh
|
||||
#
|
||||
# Nico Schottelius <nico-linux@schottelius.org>
|
||||
# Date: 17-Sep-2005
|
||||
# Last Modified: -
|
||||
#
|
||||
|
||||
[ $# -eq 1 ] || exit 23
|
||||
|
||||
PACKAGE=$1; shift
|
||||
PREFIX=/usr/packages/$PACKAGE
|
||||
|
||||
./configure --prefix=$PREfIX $@ && make
|
||||
|
|
@ -1,38 +0,0 @@
|
|||
#!/bin/sh
|
||||
|
||||
if [ $# -lt 1 ]; then
|
||||
echo "$0 disk [fullsize]"
|
||||
exit 1
|
||||
fi
|
||||
|
||||
set -x
|
||||
|
||||
export DEV=$1; shift
|
||||
export ID=$(ceph osd create)
|
||||
|
||||
ceph-disk zap $DEV
|
||||
ceph-disk prepare --bluestore $DEV --osd-id ${ID} --osd-uuid $(uuidgen) --crush-device-class hdd
|
||||
|
||||
mkdir /var/lib/ceph/osd/ceph-${ID}
|
||||
mount ${DEV}1 /var/lib/ceph/osd/ceph-${ID}
|
||||
touch /var/lib/ceph/osd/ceph-${ID}/sysvinit
|
||||
ceph auth get-or-create osd.${ID} osd 'allow *' mon 'allow profile osd' > /var/lib/ceph/osd/ceph-${ID}/keyring
|
||||
echo ${ID} > /var/lib/ceph/osd/ceph-${ID}/whoami
|
||||
ceph-osd --cluster ceph -i ${ID} --mkfs
|
||||
chown -R ceph:ceph /var/lib/ceph/osd/ceph-${ID}
|
||||
|
||||
SIZE_REAL=$(fdisk -l | grep ${DEV}2 | cut -d " " -f7 | sed 's/T//')
|
||||
|
||||
# Start with small data to get a feeling if disk really works
|
||||
SIZE_FAKE=0.1
|
||||
|
||||
if [ $# -ge 1 ]; then
|
||||
SIZE=$SIZE_REAL
|
||||
else
|
||||
SIZE=$SIZE_FAKE
|
||||
fi
|
||||
|
||||
|
||||
ceph osd crush add osd.${ID} ${SIZE} host=$(hostname)
|
||||
|
||||
/etc/init.d/ceph start osd.${ID}
|
||||
|
|
@ -1,9 +0,0 @@
|
|||
#!/bin/sh
|
||||
OLD='\[ Nico at Schottelius dot org \]'
|
||||
NEM='\[ info: use finger @schottelius.org ]'
|
||||
|
||||
if [ ! -d "$1" ]; then
|
||||
cat "$1" | sed "s/$OLD/$NEW/g"
|
||||
#> $1.tmp
|
||||
#mv $1.tmp $1
|
||||
fi
|
||||
|
|
@ -1,29 +0,0 @@
|
|||
|
||||
check_file()
|
||||
{
|
||||
if [ ! -h "$1" ]; then
|
||||
echo "$1" is not a link\! Please FIXME\!
|
||||
if [ ! -e "$1" ]; then
|
||||
echo "$1" is broken. removing.
|
||||
#rm "$1"
|
||||
fi
|
||||
fi
|
||||
}
|
||||
|
||||
for a in /usr/bin/* ; do
|
||||
check_file "$a"
|
||||
done
|
||||
|
||||
for a in /usr/lib/* ; do
|
||||
check_file "$a"
|
||||
done
|
||||
|
||||
for a in /usr/sbin/*; do
|
||||
check_file "$a"
|
||||
done
|
||||
|
||||
for a in /usr/include/*; do
|
||||
check_file "$a"
|
||||
done
|
||||
|
||||
|
||||
|
|
@ -1,14 +0,0 @@
|
|||
#!/bin/sh
|
||||
# cLinux
|
||||
# Nico Schottelius (nico-linux@schottelius.org)
|
||||
# 2005-03-27
|
||||
# build a standard package
|
||||
|
||||
[ $# -ne 1 ] && exit 1
|
||||
|
||||
PRE_PREFIX=/usr/packages
|
||||
PKGDL=$1
|
||||
|
||||
PREFIX=${PRE_PREFIX}/${PKGDL}
|
||||
|
||||
./configure "--prefix=${PREFIX}"
|
||||
Loading…
Reference in New Issue