summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat
-rw-r--r--network/users-agent/README2
-rw-r--r--network/users-agent/doinst.sh26
-rw-r--r--network/users-agent/rc.users-agent29
-rw-r--r--network/users-agent/slack-desc19
-rw-r--r--network/users-agent/users-agent.SlackBuild96
-rw-r--r--network/users-agent/users-agent.info10
-rw-r--r--network/users-agent/users-agent.vcard.patch135
7 files changed, 0 insertions, 317 deletions
diff --git a/network/users-agent/README b/network/users-agent/README
deleted file mode 100644
index 384333b970..0000000000
--- a/network/users-agent/README
+++ /dev/null
@@ -1,2 +0,0 @@
-A Perl based Jabber User Directory. Currently the one running on
-users.jabber.org.
diff --git a/network/users-agent/doinst.sh b/network/users-agent/doinst.sh
deleted file mode 100644
index adc03f2ca0..0000000000
--- a/network/users-agent/doinst.sh
+++ /dev/null
@@ -1,26 +0,0 @@
-config() {
- NEW="$1"
- OLD="$(dirname $NEW)/$(basename $NEW .new)"
- # If there's no config file by that name, mv it over:
- if [ ! -r $OLD ]; then
- mv $NEW $OLD
- elif [ "$(cat $OLD | md5sum)" = "$(cat $NEW | md5sum)" ]; then
- # toss the redundant copy
- rm $NEW
- fi
- # Otherwise, we leave the .new copy for the admin to consider...
-}
-
-preserve_perms() {
- NEW="$1"
- OLD="$(dirname $NEW)/$(basename $NEW .new)"
- if [ -e $OLD ]; then
- cp -a $OLD ${NEW}.incoming
- cat $NEW > ${NEW}.incoming
- mv ${NEW}.incoming $NEW
- fi
- config $NEW
-}
-
-config etc/users-agent/config.xml.new
-preserve_perms etc/rc.d/rc.users-agent.new
diff --git a/network/users-agent/rc.users-agent b/network/users-agent/rc.users-agent
deleted file mode 100644
index 304eca03dc..0000000000
--- a/network/users-agent/rc.users-agent
+++ /dev/null
@@ -1,29 +0,0 @@
-#!/bin/sh
-
-users_agent_start() {
- if [ ! -e /var/run/users-agent/jud.pid ]; then
- su - %JUDUSR% -c "/usr/bin/users-agent -c /etc/users-agent/config.xml &"
- su - %JUDUSR% -c "ps ux" | awk '/users-agent/ && !/awk/ {print $2}' > /var/run/users-agent/jud.pid
- fi
-}
-
-users_agent_stop() {
- kill `cat /var/run/users-agent/jud.pid 2> /dev/null` 2> /dev/null
- rm -rf /var/run/users-agent/jud.pid 2> /dev/null
-}
-
-case $1 in
-'start')
- users_agent_start
- ;;
-'stop')
- users_agent_stop
- ;;
-'restart')
- users_agent_stop
- sleep 2
- users_agent_start
- ;;
-*)
- echo "usage: `basename $0` {start|stop|restart}"
-esac
diff --git a/network/users-agent/slack-desc b/network/users-agent/slack-desc
deleted file mode 100644
index 21fdfec9e7..0000000000
--- a/network/users-agent/slack-desc
+++ /dev/null
@@ -1,19 +0,0 @@
-# HOW TO EDIT THIS FILE:
-# The "handy ruler" below makes it easier to edit a package description.
-# Line up the first '|' above the ':' following the base package name, and
-# the '|' on the right side marks the last column you can put a character in.
-# You must make exactly 11 lines for the formatting to be correct. It's also
-# customary to leave one space after the ':' except on otherwise blank lines.
-
- |-----handy-ruler------------------------------------------------------|
-users-agent: users-agent (Jabber User Directory)
-users-agent:
-users-agent: A Perl based Jabber User Directory. Currently the one running on
-users-agent: users.jabber.org.
-users-agent:
-users-agent: Homepage:
-users-agent: http://www.jabberstudio.org/projects/users-agent/project/view.php
-users-agent:
-users-agent:
-users-agent:
-users-agent:
diff --git a/network/users-agent/users-agent.SlackBuild b/network/users-agent/users-agent.SlackBuild
deleted file mode 100644
index 2d6bb26416..0000000000
--- a/network/users-agent/users-agent.SlackBuild
+++ /dev/null
@@ -1,96 +0,0 @@
-#!/bin/sh
-
-# Slackware build script for users-agent
-
-# Copyright 2013 Christopher Walker Copperas Cove, TX
-# All rights reserved.
-#
-# Redistribution and use of this script, with or without modification, is
-# permitted provided that the following conditions are met:
-#
-# 1. Redistributions of this script must retain the above copyright
-# notice, this list of conditions and the following disclaimer.
-#
-# THIS SOFTWARE IS PROVIDED BY THE AUTHOR "AS IS" AND ANY EXPRESS OR IMPLIED
-# WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
-# MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO
-# EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
-# SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
-# PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
-# OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
-# WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
-# OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
-# ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-
-PRGNAM=users-agent
-VERSION=${VERSION:-1.2}
-BUILD=${BUILD:-1}
-TAG=${TAG:-_SBo}
-
-ARCH=noarch
-
-CWD=$(pwd)
-TMP=${TMP:-/tmp/SBo}
-PKG=$TMP/package-$PRGNAM
-OUTPUT=${OUTPUT:-/tmp}
-
-JUDUSR=${JUDUSR:-jabber}
-JUDGRP=${JUDGRP:-jabber}
-JUDUID=${JUDUID:-275}
-JUDGID=${JUDGID:-275}
-
-do_exit() {
- echo ; echo "You must have the ${JUDUSR} user and ${JUDGRP} group in"
- echo "order to build amanda. Sample lines to do so are below:"
- echo "# groupadd -g ${JUDGID} ${JUDGRP}"
- echo "# useradd -u ${JUDUID} -g ${JUDGRP} ${JUDUSR}"
- echo "Exiting..." ; echo ; exit 1
-}
-
-# Check for Amanada user and group availability
-if ! getent group | grep -q ^${JUDGRP}: 2>/dev/null ; then
- do_exit;
-elif ! getent passwd | grep -q ^${JUDUSR}: 2>/dev/null ; then
- do_exit;
-fi
-
-set -e
-
-rm -rf $PKG
-mkdir -p $TMP $PKG $OUTPUT
-cd $TMP
-rm -rf $PRGNAM-$VERSION
-tar xvf $CWD/Users-Agent-$VERSION.tar.gz
-cd $PRGNAM-$VERSION
-chown -R root:root .
-find -L . \
- \( -perm 777 -o -perm 775 -o -perm 750 -o -perm 711 -o -perm 555 -o -perm 511 \) \
- -exec chmod 755 {} \; -o \
- \( -perm 666 -o -perm 664 -o -perm 600 -o -perm 444 -o -perm 440 -o -perm 400 \) \
- -exec chmod 644 {} \;
-
-mkdir -p $PKG/usr/bin
-install -o root -g root -m 755 -T users-agent $PKG/usr/bin/users-agent
-
-mkdir -p $PKG/etc/{rc.d,users-agent}
-install -o root -g $JUDGRP -m 640 -T config.xml $PKG/etc/users-agent/config.xml.new
-sed -e "s/%JUDUSR%/$JUDUSR/g" $CWD/rc.users-agent >> $PKG/etc/rc.d/rc.users-agent.new
-
-mkdir -p $PKG/var/run/users-agent
-chown $JUDUSR.$JUDGRP $PKG/var/run/users-agent
-
-mkdir -p $PKG/usr/doc/$PRGNAM-$VERSION/tools
-cp -a \
- CHANGES INSTALL README \
- $PKG/usr/doc/$PRGNAM-$VERSION
-cp -a \
- createDB $CWD/users-agent.vcard.patch \
- $PKG/usr/doc/$PRGNAM-$VERSION/tools
-cat $CWD/$PRGNAM.SlackBuild > $PKG/usr/doc/$PRGNAM-$VERSION/$PRGNAM.SlackBuild
-
-mkdir -p $PKG/install
-cat $CWD/slack-desc > $PKG/install/slack-desc
-cat $CWD/doinst.sh > $PKG/install/doinst.sh
-
-cd $PKG
-/sbin/makepkg -l y -c n $OUTPUT/$PRGNAM-$VERSION-$ARCH-$BUILD$TAG.${PKGTYPE:-tgz}
diff --git a/network/users-agent/users-agent.info b/network/users-agent/users-agent.info
deleted file mode 100644
index c3a4748a8c..0000000000
--- a/network/users-agent/users-agent.info
+++ /dev/null
@@ -1,10 +0,0 @@
-PRGNAM="users-agent"
-VERSION="1.2"
-HOMEPAGE="http://www.jabberstudio.org/projects/users-agent/project/view.php"
-DOWNLOAD="http://packages.altlinux.org/en/Platform5/srpms/jabberd2-jud/sources/Users-Agent-1.2.tar.gz/download"
-MD5SUM="e1d580dc34b56d00a1990464659ea766"
-DOWNLOAD_x86_64=""
-MD5SUM_x86_64=""
-REQUIRES="perl-Net-Jabber"
-MAINTAINER="Christopher Walker"
-EMAIL="kris240376@gmail.com"
diff --git a/network/users-agent/users-agent.vcard.patch b/network/users-agent/users-agent.vcard.patch
deleted file mode 100644
index a33ce7dae9..0000000000
--- a/network/users-agent/users-agent.vcard.patch
+++ /dev/null
@@ -1,135 +0,0 @@
---- users-agent 2004-08-07 16:58:45.000000000 -0400
-+++ users-agent.vcard 2004-08-07 16:58:59.000000000 -0400
-@@ -214,18 +214,18 @@
-
- my $fromJID = $iq->GetFrom("jid");
-
-- my $command = "SELECT * FROM jud WHERE jid ='".$fromJID->GetJID()."';";
-+ my $command = "SELECT `n-given`,`n-family`,`nickname`,`email` FROM vcard WHERE `collection-owner` ='".$fromJID->GetJID()."';";
-
- my $sth = $dbh->prepare($command);
- $sth->execute;
- my $ref = $sth->fetchrow_hashref();
- if (defined($ref))
- {
-- $fields{first} = $ref->{first};
-- $fields{last} = $ref->{last};
-- $fields{nick} = $ref->{nick};
-+ $fields{first} = $ref->{'n-given'};
-+ $fields{last} = $ref->{'n-family'};
-+ $fields{nick} = $ref->{nickname};
- $fields{email} = $ref->{email};
-- $fields{registered} = 1;
-+ $fields{registered} = $ref->{'collection-owner'};
- }
- $sth->finish();
-
-@@ -273,8 +273,6 @@
- my $iqReply = $iq->Reply(type=>"result");
- my $iqReplyQuery = $iqReply->NewQuery("jabber:iq:register");
-
-- $dbh->do("DELETE FROM jud WHERE jid='".$fromJID->GetJID()."';");
--
- my @xData = $query->GetX("jabber:x:data");
- my %fields;
- if ($#xData > -1)
-@@ -296,8 +294,20 @@
- $fields{email} = $query->GetEmail();
- }
-
-- $dbh->do("INSERT INTO jud VALUES(".$dbh->quote($fromJID->GetJID()).",'',".$dbh->quote($fields{first}).",".$dbh->quote($fields{last}).",".$dbh->quote($fields{nick}).",".$dbh->quote($fields{email}).");");
--
-+ my $rowExists = $dbh->do("SELECT `collection-owner` FROM vcard WHERE `collection-owner` = ".$dbh->quote($fromJID->GetJID()));
-+
-+ if ( $rowExists == 1)
-+ {
-+ $dbh->do("UPDATE vcard
-+ SET `n-given`=".$dbh->quote($fields{first}).",`n-family`=".$dbh->quote($fields{last}).",nickname=".$dbh->quote($fields{nick}).",email=".$dbh->quote($fields{email}).
-+ "WHERE `collection-owner` = ".$dbh->quote($fromJID->GetJID()).";");
-+ }
-+ else
-+ {
-+ $dbh->do("INSERT INTO vcard (`collection-owner`,`n-given`,`n-family`,`nickname`,`email`)
-+ VALUES (".$dbh->quote($fromJID->GetJID()).",".$dbh->quote($fields{first}).",".$dbh->quote($fields{last}).",".$dbh->quote($fields{nick}).",".$dbh->quote($fields{email}).");");
-+ }
-+
- $dbh->do("OPTIMIZE TABLE jud;");
-
- $Debug->Log1("iqRegisterSetCB: reply(",$iqReply->GetXML(),")");
-@@ -369,20 +379,30 @@
- {
- next if ($field->GetValue() eq "");
- next if ($field->GetVar() eq "speed");
--
-- push(@commands,$field->GetVar()." LIKE ".$dbh->quote($likeSpeed.$field->GetValue()."%"));
-+
-+ push(@commands,"`n-given` LIKE ".$dbh->quote($likeSpeed.$field->GetValue()."%"))
-+ if ($field->GetVar() eq "first");
-+
-+ push(@commands,"`n-family` LIKE ".$dbh->quote($likeSpeed.$field->GetValue()."%"))
-+ if ($field->GetVar() eq "last");
-+
-+ push(@commands,"nickname LIKE ".$dbh->quote($likeSpeed.$field->GetValue()."%"))
-+ if ($field->GetVar() eq "nick");
-+
-+ push(@commands,"email LIKE ".$dbh->quote($likeSpeed.$field->GetValue()."%"))
-+ if ($field->GetVar() eq "email");
- }
- }
- else
- {
-
-- push(@commands,"first LIKE ".$dbh->quote("%".$query->GetFirst()."%"))
-+ push(@commands,"`n-given` LIKE ".$dbh->quote("%".$query->GetFirst()."%"))
- if ($query->DefinedFirst() && ($query->GetFirst() ne ""));
-
-- push(@commands,"last LIKE ".$dbh->quote("%".$query->GetLast()."%"))
-+ push(@commands,"`n-family` LIKE ".$dbh->quote("%".$query->GetLast()."%"))
- if ($query->DefinedLast() && ($query->GetLast() ne ""));
-
-- push(@commands,"nick LIKE ".$dbh->quote("%".$query->GetNick()."%"))
-+ push(@commands,"nickname LIKE ".$dbh->quote("%".$query->GetNick()."%"))
- if ($query->DefinedNick() && ($query->GetNick() ne ""));
-
- push(@commands,"email LIKE ".$dbh->quote("%".$query->GetEmail()."%"))
-@@ -397,7 +417,7 @@
- }
- else
- {
-- my $command = "SELECT * FROM jud WHERE ".join(" AND ",@commands)." order by last";
-+ my $command = "SELECT * FROM vcard WHERE ".join(" AND ",@commands)." order by `n-family`";
- $command .= " limit $config{mysql}->{limit}"
- if ($config{mysql}->{limit} ne "");
- $command .= ";";
-@@ -431,23 +451,23 @@
- {
- if ($hasForm == 0)
- {
-- $iqReplyQuery->AddItem(jid=>$ref->{jid},
-- first=>$ref->{first},
-- last=>$ref->{last},
-- nick=>$ref->{nick},
-+ $iqReplyQuery->AddItem(jid=>$ref->{'collection-owner'},
-+ first=>$ref->{'n-given'},
-+ last=>$ref->{'n-family'},
-+ nick=>$ref->{nickname},
- email=>$ref->{email});
- }
- else
- {
- my $item = $resultsReport->AddItem();
- $item->AddField(var=>"jid",
-- value=>$ref->{jid});
-+ value=>$ref->{'collection-owner'});
- $item->AddField(var=>"first",
-- value=>$ref->{first});
-+ value=>$ref->{'n-given'});
- $item->AddField(var=>"last",
-- value=>$ref->{last});
-+ value=>$ref->{'n-family'});
- $item->AddField(var=>"nick",
-- value=>$ref->{nick});
-+ value=>$ref->{nickname});
- $item->AddField(var=>"email",
- value=>$ref->{email});
- }
generated by cgit v1.2.3 (git 2.26.2) at 2024-12-18 07:42:35 +0000