mirror/mariadb
1
0
Fork 0
mirror of https://github.com/MariaDB/server.git synced 2025-01-19 13:32:33 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Merge here.mwagner.org:/Users/mwagner/work/bk/mysql-4.1

Browse source 
into here.mwagner.org:/Users/mwagner/work/bk/mysql-5.0
This commit is contained in:
mwagner@here.mwagner.org 2005-03-10 19:46:51 -06:00
commit b0314c1035
1 changed files with 14 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

28
Build-tools/Do-solaris-pkg
View file

@ -14,19 +14,17 @@ $pkginfo = "pkginfo";
($gid ,$pkg ,$uid ,$userInfo ,$email ,$quota ,$group ,$passwd ($gid ,$pkg ,$uid ,$userInfo ,$email ,$quota ,$group ,$passwd
,$category ,$userHome ,$vendor ,$loginShell ,$pstamp ,$basedir)=(); ,$category ,$userHome ,$vendor ,$loginShell ,$pstamp ,$basedir)=();
$fullname = shift @ARGV; $tarball= $fullname= shift @ARGV;
$fullname or die "No package name was specified"; $fullname=~ s/.*(mysql.*)\.tar\.gz/$1/;
-d $fullname or die "That directory is not present!"; $workdir= $$;
chomp ($parent_workdir= `pwd`);
$fullname =~ s,/+$,,; # Remove ending slash if any $hostname= ($fullname=~ m/^.+-64bit$/) ? $hostname . "-64bit" : $hostname;
$pkgdir= "$ENV{'HOME'}/$hostname";
$pkgdir= `cd ../$hostname; pwd`; mkdir $workdir or die "Can't make workdir: $!\n";
$pwd = `pwd`; chdir $workdir or die "Can't change to workdir: $!\n";
if ($pwd =~ '\/usr\/local') { system ("tar xzvf $tarball") == 0 or die "Can't untar: $!\n";
$pwd = $`;
}
die "Wrong location, please cd to <PKGBASE>/usr/local/ and run again.\n"
if ($pwd eq "");
system ("$find . -print | $pkgproto > $temp"); system ("$find . -print | $pkgproto > $temp");
open (PREPROTO,"<$temp") or die "Unable to read prototype information ($!)\n"; open (PREPROTO,"<$temp") or die "Unable to read prototype information ($!)\n";
@ -57,8 +55,9 @@ unlink $temp or warn "Unable to remove tempfile ($!)\n";
# Now we can start building the package # Now we can start building the package
# #
# First get some info # First get some info
$fullname =~ s,/+$,,; # Remove ending slash if any
$fullname =~ /^((mysql)-.+)-([\d\.]+)-.+$/ $fullname =~ /^((mysql)-\w+-?\w+?)-([\d\.]+\w?)-.+$/
or die "This name is not what I expected - \"$fullname\""; or die "This name is not what I expected - \"$fullname\"";
$default{"name"}= $2; $default{"name"}= $2;
@ -137,10 +136,11 @@ system ("gzip /tmp/$packagename");
# Clean-up the spool area # Clean-up the spool area
system ("(cd /var/spool/pkg; rm -rf $pkg)"); system ("(cd /var/spool/pkg; rm -rf $pkg)");
# Clean-up the ~/packaging/ area # Clean-up the ~/packaging/ area
system ("(rm -rf mysql*)");
unlink $pkginfo; unlink $pkginfo;
unlink $prototype; unlink $prototype;
system ("mv /tmp/${packagename}.gz $pkgdir"); chdir $parent_workdir or die "Can't change to parent workdir '$parent_workdir': $!\n";
system ("rm -rf $workdir") == 0 or die "Can't remove the working dir: $!\n";
system ("mv /tmp/${packagename}.gz $pkgdir") == 0 or die "Can't move the finished package out of /tmp: $!\n";
print "Done. (~/$hostname/$packagename.gz)\n"; print "Done. (~/$hostname/$packagename.gz)\n";
# The subroutines # The subroutines
sub chkvar { sub chkvar {