Changeset 659 in MondoRescue for branches/stable/tools
- Timestamp:
- Jun 9, 2006, 10:33:24 AM (18 years ago)
- Location:
- branches/stable/tools
- Files:
-
- 7 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/stable/tools/build2pkg
r599 r659 67 67 pkg="$pkg $pkg1" 68 68 69 log= /tmp/$p-rpm.log69 log=$TMP/$p-rpm.log 70 70 71 71 if [ "$dfam" = "mandriva" ]; then … … 90 90 cd .. 91 91 elif [ _"$dtype" = _"ebuild" ]; then 92 log= /tmp/$p-gentoo.log92 log=$TMP/$p-gentoo.log 93 93 ln -sf $src . 94 94 tar xfz $src $pv/distributions/${ddir}-$dver/$p-${VER}-r$TAG.ebuild … … 124 124 fi 125 125 elif [ _"$dtype" = _"deb" ]; then 126 log= /tmp/$p-deb.log126 log=$TMP/$p-deb.log 127 127 cd $TOPBUILDDIR 128 128 tar xfz $src 129 129 cd ${pv}* 130 ln -s distributions/debian debian131 # update debian/changelog132 pkg-buildpackage -us -uc -rfakeroot130 # point to the right debian conf 131 ln -s distributions/${ddir}-$dver debian 132 dpkg-buildpackage -us -uc -rfakeroot 133 133 # Et voila ! 134 134 else … … 138 138 echo "Packages handled : $pkg" 139 139 140 rm -rf $TMP 141 140 142 if [ $status = 0 ]; then 141 143 if [ _"$dtype" = _"rpm" ]; then -
branches/stable/tools/distro-env
r596 r659 124 124 fi 125 125 mkdir -p ${TOPBUILDDIR}/{RPMS,SRPMS,SPECS,SOURCES,BUILD} 126 elif [ _"$dtype" = _"deb" ]; then 127 export TOPBUILDDIR=${BASE}/build 128 mkdir -p ${TOPBUILDDIR} 126 129 elif [ _"$dtype" = _"ebuild" ]; then 127 130 export TOPBUILDDIR=${BASE}/build -
branches/stable/tools/livwww
r563 r659 92 92 ln -sf /var/www/html/admin . 93 93 94 # Compute News 95 $TOOLHOME/mknewshtml.pl $LOCALDIR 96 94 97 if [ _"$1" == _"" ]; then 95 98 exit 0 -
branches/stable/tools/mkannounce
r651 r659 64 64 rm -f $TMP/mindi.ann $TMP/mondo.ann 65 65 66 vi $TMP/announce.tmp 66 67 # Store it in DB for Web pages generation 67 68 $TOOLHOME/mkannounce.pl $TMP/announce.tmp 68 69 # Then deliver it on the Web 69 #$TOOLHOME/livwww www 70 $TOOLHOME/livwww www 71 cat > $TMP/announce.hdr << EOF 72 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/x html1/DTD/xhtml1-strict.dtd"> 73 74 <html xmlns="http://www.w3.org/1999/xhtml" dir="ltr" xml:lang="en" lang="en"> 75 <head> 76 </head> 77 <body> 78 <p> 79 EOF 80 cat > $TMP/announce.ftr << EOF 81 </body> 82 </html> 83 EOF 84 # Mail it to mr ML 85 cat $TMP/announce.hdr $TMP/announce.tmp $TMP/announce.ftr | w3m -dump -T text/html > $TMP/mondo.ann.txt 86 export EMAIL="bruno@mondorescue.org" 87 export TMPDIR=$TMP 88 cat $TMP/mondo.ann.txt | mutt -s "`head -1 $TMP/mondo.ann.txt`" mondo-devel@lists.sourceforge.net -c mondorescue-announce@lists.berlios.de 89 rm -rf $TMP -
branches/stable/tools/mkannounce.pl
r651 r659 28 28 } 29 29 30 my $db="$TOOLHOME/../website/announces .sql";30 my $db="$TOOLHOME/../website/announces3.sql"; 31 31 32 32 my $dbh = DBI->connect("dbi:SQLite:dbname=$db","","", … … 40 40 open(ANNOUNCE,$ARGV[0]) || die "Unable to open $ARGV[0] (read)"; 41 41 my $announce = <ANNOUNCE>; 42 $announce =~ s/\"/\"\"/g; 42 #$announce =~ s/\"/\"\"/g; 43 #$announce =~ s/!//g; 43 44 close(ANNOUNCE); 44 45 45 46 print "INSERT INTO announces VALUES (NULL, $date, $announce)\n"; 46 #$dbh->do("INSERT INTO announces VALUES (NULL, $date, $announce)") 47 my $sth = $dbh->prepare(qq{INSERT INTO announces VALUES (NULL,?,?)}) 48 || die "Unable to insert into $db"; 49 $sth->execute($date, $announce); 50 #$dbh->do(qq(INSERT INTO announces VALUES (NULL, '$date', '$announce'))) 47 51 #|| die "Unable to insert into $db"; 52 48 53 $dbh->disconnect; -
branches/stable/tools/mkchangelog.pl
r651 r659 20 20 my $chglog = ""; 21 21 my $ndate = ""; 22 my $n2date = ""; 22 23 my $tmp = ""; 23 24 my $ver = ""; … … 79 80 #print "**$date**\n"; 80 81 $ndate = UnixDate($date,"%a", "%b", "%d", "%Y"); 82 $n2date = &UnixDate($date,"%a, %d %b %Y %H:%M:%S %z"); 81 83 #print "**$ndate**\n"; 82 84 if ($dtype eq "rpm") { … … 84 86 print OUTPUT "- Updated to $ver\n"; 85 87 } 88 if ($dtype eq "deb") { 89 print OUTPUT "$pkg ($ver) unstable; urgency=low\n"; 90 print OUTPUT "\n"; 91 } 86 92 87 93 $tmp = <INPUT>; 88 94 while ($tmp !~ /^$/) { 89 print OUTPUT $tmp; 95 if ($dtype eq "deb") { 96 print OUTPUT " * $tmp"; 97 } 98 else { 99 print OUTPUT "$tmp"; 100 } 90 101 last if (eof(INPUT)); 91 102 $tmp = <INPUT>; 92 103 } 93 104 print OUTPUT "\n"; 105 106 if ($dtype eq "deb") { 107 print OUTPUT " -- Bruno Cornec <bruno\@mondorescue.org> $n2date\n\n"; 108 print OUTPUT "\n"; 109 } 110 94 111 last if (eof(INPUT)); 95 112 last if ($dtype eq "announce"); -
branches/stable/tools/svn2build
r651 r659 85 85 elif [ "$dtype" = "deb" ]; then 86 86 # To be developped 87 m4 $TMP/mondorescue.mc $dest/distributions/$dfam/$p > /dev/null 87 #m4 $TMP/mondorescue.mc $dest/distributions/$dfam/$p > /dev/null 88 cp -a $dest/distributions/$ddir/* $dest/distributions/${ddir}-$dver 89 $TOOLHOME/mkchangelog.pl $dtype $p $dest/distributions/${ddir}-$dver/changelog 90 if [ $? -ne 0 ]; then 91 echo "Unable to create changelog for ${ddir}-$dver/changelog" 92 exit -1 93 fi 88 94 else 89 95 echo "Unknown Build" … … 134 140 done 135 141 136 rm - f $TMP/mondorescue.mc142 rm -rf $TMP 137 143 138 144 echo "Version delivered :"
Note:
See TracChangeset
for help on using the changeset viewer.