aboutsummaryrefslogtreecommitdiff
path: root/tools
diff options
context:
space:
mode:
authorSlack Coder <slackcoder@server.ky>2024-11-28 09:59:36 -0500
committerSlack Coder <slackcoder@server.ky>2025-02-19 09:55:01 -0500
commit24493e32d8548110c514db9bc09efb5aba276ca5 (patch)
tree80319bacf6eb845741beb8d331969884495d6f4c /tools
parent82a520dcb6f6cfe538c68fd04a8a7b94f3b177c2 (diff)
downloadsbotools2-24493e32d8548110c514db9bc09efb5aba276ca5.tar.xz
Set To Do branch
Diffstat (limited to 'tools')
-rwxr-xr-xtools/cover.pl54
-rwxr-xr-xtools/htmlgen.sh69
-rwxr-xr-xtools/masstest_sbo.sh75
-rwxr-xr-xtools/package_up.sh67
-rwxr-xr-xtools/update_man_pages.sh137
-rwxr-xr-xtools/update_versions.sh67
6 files changed, 0 insertions, 469 deletions
diff --git a/tools/cover.pl b/tools/cover.pl
deleted file mode 100755
index fcd813f..0000000
--- a/tools/cover.pl
+++ /dev/null
@@ -1,54 +0,0 @@
-#!/usr/bin/env perl
-
-use strict;
-use warnings;
-use feature 'say';
-
-use AWS::S3;
-use Path::Tiny;
-
-if (!@ARGV) {
- die "Need to specify a build number to check coverage for.\n";
-}
-
-my $build = shift;
-my $base = qr!^[^/]+/sbotools/\Q$build\E/!;
-
-if (
- ! length($ENV{S3_ID}) or
- ! length($ENV{S3_KEY}) or
- ! length($ENV{S3_BUCKET})) {
- die "S3_ID and S3_KEY need to be defined in the environment.\n";
-}
-
-print "Connecting to S3...\n";
-
-my $s3 = AWS::S3->new(
- access_key_id => $ENV{S3_ID},
- secret_access_key => $ENV{S3_KEY},
-);
-
-my $bucket = $s3->bucket($ENV{S3_BUCKET});
-
-my $f_iter = $bucket->files(
- page_size => 100,
- page_number => 1,
- pattern => qr!$base\Q$build.11\E/!,
-);
-
-my $num = 0;
-while (my @files = $f_iter->next_page) {
- for my $file (@files) {
- $num++;
- print $file->key, "\n";
-
- my $local_fname = $file->key =~ s!$base!cover_db/!r;
- my $path = path($local_fname)->absolute();
-
- $path->touchpath->spew_raw(${ $file->contents() });
- }
-}
-
-if ($num == 0) {
- die "No files found for build number $build.\n";
-}
diff --git a/tools/htmlgen.sh b/tools/htmlgen.sh
deleted file mode 100755
index 3953490..0000000
--- a/tools/htmlgen.sh
+++ /dev/null
@@ -1,69 +0,0 @@
-#!/usr/bin/env bash
-
-if [ "$1" == "" -o "$1" == "-h" ]; then
- echo "usage: $(basename $0) destdir"
- exit 1
-fi
-
-DESTDIR=$1
-PACKAGE="sbotools"
-VERSION=$(grep '^our $VERSION' SBO-Lib/lib/SBO/Lib.pm | grep -Eo '[0-9]+(\.[0-9RC]+){0,1}')
-
-
-SBO_DIR=`pwd`
-TMP_DIR=$(mktemp -d "/tmp/$PACKAGE.XXXXXXXXXX")
-HTML_DIR="$TMP_DIR/html"
-mkdir -p $DESTDIR $HTML_DIR
-
-for i in $(ls $SBO_DIR | grep '^man'); do
- mkdir -p $HTML_DIR/$i
- ( cd $SBO_DIR/$i
- for j in $(ls); do
- man2html $j > $j.html
- mv $j.html $HTML_DIR/$i/
- done
- )
- ( cd $HTML_DIR/$i
- sed -i 's/^Content-type.*$//g' *
- sed -i 's/^<A HREF.*Return to Main.*$//g' *
- sed -i -r "s#http://localhost/cgi-bin/man/man2html\?([0-9])\+([^\"]+)#/$PACKAGE/documentation/\2.\1.html#g" *
- sed -i 's/j@dawnrazor.net/j_[at]_dawnrazor_[dot]_net/g' *
- sed -i 's/xocel@iquidus.org/xocel_[at]_iquidus_[dot]_org/g' *
- sed -i 's/andreas.guldstrand@gmail.com/andreas_[dot]_guldstrand_[at]_gmail_[dot]_com/g' *
- sed -i 's/<A HREF="mailto:xocel_\[at\]_iquidus_\[dot\]_org">//g' *
- sed -i 's/<A HREF="mailto:andreas_\[dot\]_guldstrand_\[at\]_gmail_\[dot\]_com">//g' *
- sed -i 's#\[dot\]_org</A>#[dot]_org#g' *
- sed -i 's#\[dot\]_com</A>#[dot]_com#g' *
- sed -i 's#<A HREF="http://localhost/cgi-bin/man/man2html">man2html</A>#man2html#g' *
- sed -i 's/^$//g' *
- sed -i 's/^<HTML><HEAD>.*$//g' *
- sed -i 's#^</HEAD><BODY>$##g' *
- sed -i 's#</BODY>##g' *
- sed -i 's#</HTML>##g' *
- for k in $(ls); do
- mv $k $k.tmp
- cat $k.tmp | awk "\$0 !~ /^$/ { print > \"$k\"; }"
- rm $k.tmp
- mv $k ..
- done
- )
- rmdir $HTML_DIR/$i
-done
-
-template() {
- SRC=$1
- TEMPLATE="$DESTDIR/template.html"
- NAME=${SRC//.?.html/}
- echo "Writing $DESTDIR/$SRC ($NAME)"
- perl -0777 -pE 's/\@TITLE\@/'$NAME'/g; s/\@MAN\@/<>/e' $TEMPLATE $SRC > $DESTDIR/$SRC
-}
-
-(cd $HTML_DIR
- for src in $(ls)
- do
- template $src
- done
-)
-
-echo "All done."
-exit 0;
diff --git a/tools/masstest_sbo.sh b/tools/masstest_sbo.sh
deleted file mode 100755
index a544e12..0000000
--- a/tools/masstest_sbo.sh
+++ /dev/null
@@ -1,75 +0,0 @@
-#!/usr/bin/bash
-
-# set DISTCLEAN TRUE to preserve space
-sboconfig -d TRUE
-# clear out work directories and distfiles
-sboclean -dw
-
-SBOS=$(find /usr/sbo -type f -iname \*.info | sed -r 's|.*/([^/]+)\.info$|\1|g');
-
-TLOG=~/tmp.log
-ILOG=~/install.log
-RLOG=~/remove.log
-
-# zero out logs in case they have content from previous run
-:> $ILOG
-:> $RLOG
-
-for i in build md5sum wget noinfo nomulti else; do
- :> ~/$i.fail.log
-done
-
-function build_things() {
- if [ ! -z $1 ]; then
- . /usr/sbo/*/$1/$1.info
- for i in $REQUIRES; do
- if [[ "$i" != "%README%" ]]; then
- build_things $i
- fi
- done
- echo "=============" > $TLOG
- echo "sboinstall -r $1" >> $TLOG
- sboinstall -r $1 >> $TLOG 2>&1
- case "$?" in
- "0") OLOG="" ;;
- "3") OLOG=~/build.fail.log ;;
- "4") OLOG=~/md5sum.fail.log ;;
- "5") OLOG=~/wget.fail.log ;;
- "7") OLOG=~/noinfo.fail.log ;;
- "9") OLOG=~/nomulti.fail.log ;;
- *) OLOG=~/else.fail.log ;;
- esac
- if [[ "$OLOG" != "" ]]; then
- if ! grep -q "^$1 added to install queue.$" $OLOG; then
- echo "" >> $OLOG
- cat $TLOG >> $OLOG
- fi
- fi
- echo "" >> $ILOG
- cat $TLOG >> $ILOG
- :> $TLOG
- else
- echo "build_things() requires an argument."
- exit 1
- fi
-}
-
-function remove_things() {
- if [ ! -z $1 ]; then
- echo "=============" > $TLOG
- echo "sboremove --nointeractive $1" >> $TLOG
- sboremove --nointeractive $1 >> $TLOG 2>&1
- echo "" >> $RLOG
- cat $TLOG >> $RLOG
- :> $TLOG
- fi
-}
-
-for i in $SBOS; do
- echo $i
- build_things $i
- remove_things $i
- removepkg $(ls /var/log/packages|grep SBo) > /dev/null 2>&1
-done
-
-exit 0
diff --git a/tools/package_up.sh b/tools/package_up.sh
deleted file mode 100755
index d9acf14..0000000
--- a/tools/package_up.sh
+++ /dev/null
@@ -1,67 +0,0 @@
-#!/bin/bash
-
-PACKAGE="sbotools2"
-VERSION=$(grep '^our $VERSION' SBO-Lib/lib/SBO/Lib.pm | grep -Eo '[0-9]+(\.[0-9RC@gita-f]+){0,2}')
-FILENAME=$PACKAGE-$VERSION.tar.gz
-
-echo "Making package for $PACKAGE-$VERSION." \
- "Press enter to continue or Ctrl+C to abort."
-read
-
-PKG_HOME=`pwd`
-
-cleanup() {
- if [[ "$1" != "" ]]; then
- rm -rf $1
- fi
-}
-
-update_info() {
- FILE=$1
- MD5=$(md5sum $PKG_HOME/$FILENAME | cut -d' ' -f1)
- sed -i -e "s/@FILENAME@/$FILENAME/" $FILE
- sed -i -e "s/@VERSION@/$VERSION/" $FILE
- sed -i -e "s/@MD5@/$MD5/" $FILE
-}
-
-TMP_DIR=$(mktemp -d /tmp/$PACKAGE.XXXXXXXXXXXX)
-PKG_DIR="$TMP_DIR/$PACKAGE-$VERSION"
-SBO_DIR="$TMP_DIR/$PACKAGE"
-mkdir "$PKG_DIR"
-mkdir "$SBO_DIR"
-
-find "$PKG_HOME" -maxdepth 1 | while read f
-do
- cp -R "$f" "$PKG_DIR"
-done
-
-for remove in t tools README.md TODO; do
- if [[ -e $PKG_DIR/$remove ]]; then
- rm -rf $PKG_DIR/$remove
- fi
-done
-if [[ -d $PKG_DIR/slackbuild/$PACKAGE ]]; then
- if [[ -f $PKG_DIR/slackbuild/$PACKAGE/README ]]; then
- cp $PKG_DIR/slackbuild/$PACKAGE/README $PKG_DIR/
- fi
- mv $PKG_DIR/slackbuild/$PACKAGE/* $SBO_DIR
- rm -rf $PKG_DIR/slackbuild
-fi
-
-
-find "$TMP_DIR" -type f -name \*~ -exec rm {} \;
-
-(cd "$TMP_DIR"
- tar cvzf $FILENAME $PACKAGE-$VERSION/
- cp $FILENAME $PKG_HOME
-)
-(cd "$TMP_DIR"
- update_info "$PACKAGE/$PACKAGE.info"
- update_info "$PACKAGE/$PACKAGE.SlackBuild"
- grep VERSION "$PACKAGE/$PACKAGE.SlackBuild"
- tar cjf $PACKAGE.tar.bz2 $PACKAGE/
-)
-mv "$TMP_DIR/$PACKAGE.tar.bz2" "$PKG_HOME"
-
-cleanup "$TMP_DIR"
-exit 0
diff --git a/tools/update_man_pages.sh b/tools/update_man_pages.sh
deleted file mode 100755
index f59d611..0000000
--- a/tools/update_man_pages.sh
+++ /dev/null
@@ -1,137 +0,0 @@
-#!/bin/sh
-
-usage_exit() {
- echo "Usage: $(basename $0) (-d) (-g)"
- exit 1
-}
-
-if [[ "$1" == "-h" ]]; then
- usage_exit
-fi
-
-if [[ "$1" == "-?" ]]; then
- usage_exit
-fi
-
-if [[ "$1" == "-d" ]]; then
- date=true
- shift
-fi
-
-if [[ "$1" == "-g" ]]; then
- git=true
- shift
-fi
-
-version=$(grep '^our $VERSION' SBO-Lib/lib/SBO/Lib.pm | grep -Eo '[0-9]+(\.[0-9RC@gita-f]+){0,1}')
-
-if ! [[ -d "./man1" ]]; then
- echo "you do not seem to be at the right place to run this."
- echo "the man{1,5}/ directories should be under ."
- exit 1
-fi
-
-old_version=$(head -1 man1/sbocheck.1 | rev | cut -d' ' -f2 | rev \
- | sed 's/"//g')
-
-tmpfile=$(mktemp /tmp/XXXXXXXXX)
-
-sed_file() {
- if [[ "$1" == "" || "$2" == "" ]]; then
- echo "sed_file(): two arguments required."
- exit 1
- fi
-
- file="$1"
- sed_cmd="$2"
-
- cat $file | sed "$sed_cmd" > $tmpfile
- if [[ "$?" == "0" ]]; then
- mv $tmpfile $file
- else
- return 1
- fi
-
- return 0
-}
-
-for i in $(ls man1); do
- sed_file man1/$i "s/$old_version/$version/g"
-done
-
-for i in $(ls man5); do
- sed_file man5/$i "s/$old_version/$version/g"
-done
-
-if [[ "$?" == "0" ]]; then
- echo "version updated."
-fi
-
-update_date() {
- if ! which ddate >/dev/null 2>&1; then
- echo "I can't find ddate."
- return 1
- fi
-
- old_date=$(head -1 man1/sbocheck.1 | cut -d' ' -f4- | rev \
- | cut -d' ' -f4- | rev | sed 's/"//g')
-
- new_date=$(ddate +"%{%A, %B %d%}, %Y YOLD%N - %H")
-
- for i in man1/*; do
- sed_file $i "s/$old_date/$new_date/g"
- done
-
- for i in man5/*; do
- sed_file $i "s/$old_date/$new_date/g"
- done
-
- if [[ "$?" == "0" ]]; then
- echo "date updated."
- else
- return 1
- fi
-
- return 0
-}
-
-update_git() {
- if ! which git >/dev/null 2>&1; then
- echo "I can't find git."
- return 1
- fi
-
- if [[ "$date" == "true" ]]; then
- extra=" and dates"
- fi
-
- git add man1/* man5/*
- git commit -m "updated versions$extra for man pages"
- git push
-
- if [[ "$?" == "0" ]]; then
- echo "git updated."
- else
- return 1
- fi
-
- return 0
-}
-
-date_return=0
-if [[ "$date" == "true" ]]; then
- update_date
- date_return=$?
-fi
-
-git_return=0
-if [[ "$git" == "true" ]]; then
- update_git
- git_return=$?
-fi
-
-if [[ "$date_return" != "0" || "$git_return" != "0" ]]; then
- exit 1
-fi
-
-exit 0
diff --git a/tools/update_versions.sh b/tools/update_versions.sh
deleted file mode 100755
index 09a0043..0000000
--- a/tools/update_versions.sh
+++ /dev/null
@@ -1,67 +0,0 @@
-#!/bin/sh
-
-usage_exit() {
- echo "Usage: $(basename $0) (-g) version"
- exit 1
-}
-
-if [[ "$1" == "" ]]; then
- usage_exit
-fi
-
-if [[ "$1" == "-?" ]]; then
- usage_exit
-fi
-
-if [[ "$1" == "-h" ]]; then
- usage_exit
-fi
-
-if [[ "$1" == "-g" ]]; then
- git=true
- shift
-fi
-
-if [[ "$1" == "" ]]; then
- usage_exit
-fi
-
-version="$1"
-
-update_perl="
- SBO-Lib/lib/SBO/Lib.pm
- SBO-Lib/lib/SBO/Lib/Util.pm
- SBO-Lib/lib/SBO/Lib/Tree.pm
- SBO-Lib/lib/SBO/Lib/Repo.pm
- SBO-Lib/lib/SBO/Lib/Readme.pm
- SBO-Lib/lib/SBO/Lib/Pkgs.pm
- SBO-Lib/lib/SBO/Lib/Info.pm
- SBO-Lib/lib/SBO/Lib/Download.pm
- SBO-Lib/lib/SBO/Lib/Build.pm
- SBO-Lib/lib/SBO/App.pm
- SBO-Lib/lib/SBO/App/Remove.pm
- SBO-Lib/lib/SBO/App/Snap.pm
-"
-update_other="
- SBO-Lib/README
- slackbuild/sbotools2/sbotools2.SlackBuild
- slackbuild/sbotools2/sbotools2.info
-"
-
-old_version=$(grep '^our $VERSION' SBO-Lib/lib/SBO/Lib.pm | grep -Eo '[0-9]+(\.[0-9RC@gita-f]+){0,1}')
-
-tmpfile=$(mktemp /tmp/XXXXXXXXXX)
-
-for i in $update_other; do
- cat $i | sed "s/$old_version/$version/g" > $tmpfile
- if [[ "$?" == "0" ]]; then
- mv $tmpfile $i
- fi
-done
-
-for i in $update_perl; do
- cat $i | sed "s/'$old_version'/'$version'/g" > $tmpfile
- if [[ "$?" == "0" ]]; then
- mv $tmpfile $i
- fi
-done