aboutsummaryrefslogtreecommitdiff
path: root/mkslackinfo
blob: db112446c5d57dc7e930898e9fa18180c20cd0e2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
#!/usr/bin/perl -w

# Create a SB.o compliant .info file
# (and a .SlackBuild from a template, if one doesn't already exist,
# and a slack-desc if a README exists)

# Fill in your name and email address here:
$name = 'B. Watson';
$email = 'yalhcru@gmail.com';

use LWP::Simple;
use Digest::MD5 'md5_hex';

sub usage {
	die "usage: mkslackinfo url [homepage] [version]\n";
}

$url = shift || &usage;

# Take package name from the current dir
chomp ($package = `pwd`);
$package =~ s,.*/,,;

# Take filename from last part of URL
($file = $url) =~ s,.*/,,;

# Generate appropriate extract command
if($file =~ /\.zip$/i) {
	$extract = "unzip \$CWD/\$PRGNAM-\$VERSION.zip";
} elsif($file =~ /\.rar$/i) {
	$extract = "unrar x \$CWD/\$PRGNAM-\$VERSION.rar";
} elsif($file =~ /\.7z$/i) {
	$extract = "7za x \$CWD/\$PRGNAM-\$VERSION.rar";
} elsif($file =~ /(\.tar(?:$|\..*)|\.t[bxg]z)/i) {
	$extract = "tar xvf \$CWD/\$PRGNAM-\$VERSION$1";
}

$homepage = shift;
if(!$homepage) {
	if($url =~ m{http://downloads.(?:sourceforge|sf).net/([^/]+)/}) {
		$homepage = "http://sourceforge.net/projects/$1/";
	} elsif($url =~ m,((?:ht|f)tp://[^/]+/),) {
		$homepage = $1;
	} else {
		die "Can't figure out homepage\n";
	}

	warn "Assuming homepage is $homepage\n";
}

$version = shift || 0;
if(!$version) {
	# Try to figure out the version number. The regex is fairly dumb.
	if($file =~ /-(\d[\d._]+(?:[a-z]+)?)\.(?:tar|t[gzb]z|zip|rar|7z)/) {
		$version = $1;
		warn "Version appears to be $version\n";
	} else {
		die "Can't figure out version number\n";
	}
}

if(not -e "$package.SlackBuild") {
	warn "$package.SlackBuild does not exist, creating from template\n";
	open my $build, ">$package.SlackBuild" or die $!;
	while(<DATA>) {
		s/__NAME__/$name/g;
		s/__EMAIL__/$email/g;
		s/__PRGNAM__/$package/g;
		s/__VERSION__/$version/g;
		s/__EXTRACT__/$extract/g;
		print $build "$_";
	}
	close $build;
	chmod 0755, "$package.SlackBuild";
}

if((-e "README") && (! -e "slack-desc")) {
	warn "slack-desc does not exist, creating from existing README\n";
	system("mkslackdesc");
}

print STDERR "Downloading $url...";
$content = get($url);
if($content) {
	$md5 = md5_hex($content);
	print STDERR "OK\nWriting $package.info\n";
} else {
	warn "Can't download $url with LWP::Simple, MD5SUM will be wrong in .info\n";
	$md5 = "FIXME";
}

open $f, ">$package.info" or die $!;
$content = <<EOF;
PRGNAM="$package"
VERSION="$version"
HOMEPAGE="$homepage"
DOWNLOAD="$url"
MD5SUM="$md5"
DOWNLOAD_x86_64=""
MD5SUM_x86_64=""
REQUIRES=""
MAINTAINER="$name"
EMAIL="$email"
EOF
print $content;
print $f $content;
close $f;

if($url =~ /sourceforge\.net/i) {
	$extra_wget_params = "--user-agent wget";
} else {
	$extra_wget_params = "--referer='$url'";
}

exec("wget $extra_wget_params $url");

__DATA__
#!/bin/sh

# Slackware build script for __PRGNAM__

# Written by __NAME__ (__EMAIL__)

# Licensed under the WTFPL. See http://www.wtfpl.net/txt/copying/ for details.

PRGNAM=__PRGNAM__
VERSION=${VERSION:-__VERSION__}
BUILD=${BUILD:-1}
TAG=${TAG:-_SBo}

if [ -z "$ARCH" ]; then
  case "$( uname -m )" in
    i?86) ARCH=i486 ;;
    arm*) ARCH=arm ;;
       *) ARCH=$( uname -m ) ;;
  esac
fi

CWD=$(pwd)
TMP=${TMP:-/tmp/SBo}
PKG=$TMP/package-$PRGNAM
OUTPUT=${OUTPUT:-/tmp}

if [ "$ARCH" = "i486" ]; then
  SLKCFLAGS="-O2 -march=i486 -mtune=i686"
  LIBDIRSUFFIX=""
elif [ "$ARCH" = "i686" ]; then
  SLKCFLAGS="-O2 -march=i686 -mtune=i686"
  LIBDIRSUFFIX=""
elif [ "$ARCH" = "x86_64" ]; then
  SLKCFLAGS="-O2 -fPIC"
  LIBDIRSUFFIX="64"
else
  SLKCFLAGS="-O2"
  LIBDIRSUFFIX=""
fi

set -e

rm -rf $PKG
mkdir -p $TMP $PKG $OUTPUT
cd $TMP
rm -rf $PRGNAM-$VERSION
__EXTRACT__
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 640 -o -perm 600 -o -perm 444 \
 -o -perm 440 -o -perm 400 \) -exec chmod 644 {} \;

CFLAGS="$SLKCFLAGS" \
CXXFLAGS="$SLKCFLAGS" \
./configure \
  --prefix=/usr \
  --libdir=/usr/lib${LIBDIRSUFFIX} \
  --sysconfdir=/etc \
  --localstatedir=/var \
  --mandir=/usr/man \
  --docdir=/usr/doc/$PRGNAM-$VERSION \
  --build=$ARCH-slackware-linux

make
make install-strip DESTDIR=$PKG

find $PKG -print0 | xargs -0 file | grep -e "executable" -e "shared object" | grep ELF \
  | cut -f 1 -d : | xargs strip --strip-unneeded 2> /dev/null || true

find $PKG/usr/man -type f -exec gzip -9 {} \;
for i in $( find $PKG/usr/man -type l ) ; do ln -s $( readlink $i ).gz $i.gz ; rm $i ; done

rm -f $PKG/usr/info/dir
gzip -9 $PKG/usr/info/*.info*

find $PKG -name perllocal.pod \
  -o -name ".packlist" \
  -o -name "*.bs" \
  | xargs rm -f

mkdir -p $PKG/usr/doc/$PRGNAM-$VERSION
cp -a <documentation> \
  $PKG/usr/doc/$PRGNAM-$VERSION
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}