diff options
author | Matthias Klose <doko@gcc.gnu.org> | 2007-06-03 23:18:43 +0000 |
---|---|---|
committer | Matthias Klose <doko@gcc.gnu.org> | 2007-06-03 23:18:43 +0000 |
commit | e1bea0c0687c5f4551b3a6058ec37ce3705fa6cc (patch) | |
tree | a9c9e7d91c484d53fe154f9285fc57325572ce50 /libjava/classpath/scripts/patches.pl | |
parent | af333b9a7f9e1cc1029bec56d48f2de63acdf686 (diff) | |
download | gcc-e1bea0c0687c5f4551b3a6058ec37ce3705fa6cc.zip gcc-e1bea0c0687c5f4551b3a6058ec37ce3705fa6cc.tar.gz gcc-e1bea0c0687c5f4551b3a6058ec37ce3705fa6cc.tar.bz2 |
libjava/classpath/ChangeLog.gcj:
2007-05-31 Matthias Klose <doko@ubuntu.com>
* javax/management/NotificationBroadcasterSupport.java
(getNotificationInfo): Add cast.
* native/jni/qt-peer/Makefile.am (AM_CXXFLAGS): Add libstdc++ include
directories.
* native/jni/qt-peer/Makefile.in: Regenerate.
libjava/ChangeLog:
2007-06-03 Matthias Klose <doko@ubuntu.com>
* java/io/natFileWin32.cc (setFilePermissions): New (stub only).
_access: Handle EXEC query, stub only.
2007-06-03 Matthias Klose <doko@ubuntu.com>
Merged from classpath:
* gnu/java/nio/SelectorProviderImpl.java: Whitespace merge.
* java/lang/System.java(inheritedChannel): New.
* java/lang/Character.java: Remove stray`;'.
* java/net/MulticastSocket.java: Merged.
* java/text/DateFormatSymbols.java(getInstance): New, comment updates.
* java/text/Collator.java(getInstance): Merged.
* java/util/Calendar.java: New attributes ALL_STYLES, SHORT, LONG.
getDisplayName, getDisplayNames: New.
* java/util/logging/Logger.java: Merged.
* Regenerate .class and .h files.
2007-06-03 Matthias Klose <doko@ubuntu.com>
* java/io/File.java: Merge with classpath-0.95, new method
setFilePermissions, new attribute EXEC.
* java/io/natFilePosix.cc (setFilePermissions): New.
_access: Handle EXEC query.
* classpath/lib/java/io/File.class, java/io/File.h: Regenerate.
2007-06-03 Matthias Klose <doko@ubuntu.com>
Imported GNU Classpath 0.95.
* classpath/Makefile.in,
classpath/native/jni/midi-dssi/Makefile.in,
classpath/native/jni/classpath/Makefile.in,
classpath/native/jni/Makefile.in,
classpath/native/jni/gconf-peer/Makefile.in,
classpath/native/jni/java-io/Makefile.in,
classpath/native/jni/native-lib/Makefile.in,
classpath/native/jni/java-util/Makefile.in,
classpath/native/jni/midi-alsa/Makefile.in,
classpath/native/jni/java-lang/Makefile.in,
classpath/native/jni/java-nio/Makefile.in,
classpath/native/jni/java-net/Makefile.in,
classpath/native/jni/xmlj/Makefile.in,
classpath/native/jni/qt-peer/Makefile.in,
classpath/native/jni/gtk-peer/Makefile.in,
classpath/native/Makefile.in, classpath/native/jawt/Makefile.in,
classpath/native/fdlibm/Makefile.in,
classpath/native/plugin/Makefile.in,
classpath/resource/Makefile.in, classpath/scripts/Makefile.in,
classpath/tools/Makefile.in, classpath/doc/Makefile.in,
classpath/doc/api/Makefile.in, classpath/lib/Makefile.in,
classpath/external/Makefile.in, classpath/external/jsr166/Makefile.in,
classpath/external/sax/Makefile.in,
classpath/external/w3c_dom/Makefile.in,
classpath/external/relaxngDatatype/Makefile.in,
classpath/include/Makefile.in,
classpath/examples/Makefile.in: Regenerate.
* classpath/config.guess, classpath/config.sub,
classpath/ltmain.sh : Update.
* classpath/configure, classpath/depcomp, classpath/missing,
classpath/aclocal.m4, classpath/install-sh: Regenerate.
* gnu/classpath/Configuration.java (CLASSPATH_VERSION): Now 0.95.
* sources.am: Regenerate.
* Makefile.in: Regenerate.
* Update the .class files and generated CNI header files, add new
.class and generated CNI header files.
* Remove generated files for removed java source files:
classpath/gnu/java/net/BASE64.java,
classpath/gnu/java/security/util/Base64.java,
classpath/gnu/java/awt/peer/gtk/GThreadMutex.java,
classpath/gnu/java/awt/peer/gtk/GThreadNativeMethodRunner.java,
classpath/gnu/java/awt/font/autofit/Scaler.java,
classpath/gnu/classpath/jdwp/util/Value.java,
classpath/gnu/javax/net/ssl/Base64.java.
* Remove empty directories.
* Makefile.am(nat_source_files): Add natVMOperatingSystemMXBeanImpl.cc.
* java/lang/Class.java(setAccessible): Merge from classpath.
* java/util/Locale.java: Remove.
* gnu/java/lang/management/VMOperatingSystemMXBeanImpl.java,
gnu/java/lang/management/natVMOperatingSystemMXBeanImpl.cc: New.
* gcj/javaprims.h: Update class declarations.
* scripts/classes.pl: Update usage.
* HACKING: Mention to build all peers.
From-SVN: r125302
Diffstat (limited to 'libjava/classpath/scripts/patches.pl')
-rwxr-xr-x | libjava/classpath/scripts/patches.pl | 164 |
1 files changed, 0 insertions, 164 deletions
diff --git a/libjava/classpath/scripts/patches.pl b/libjava/classpath/scripts/patches.pl deleted file mode 100755 index 57f134d..0000000 --- a/libjava/classpath/scripts/patches.pl +++ /dev/null @@ -1,164 +0,0 @@ -#!/usr/bin/perl -w -# Purpose is to move patches from upload directory to -# public patches directory. Any file not matching the correct -# pattern is deleted. Any patch file without a README and the -# file was last modified more than 120 minutes ago is deleted. -# Any README file without a patch file which was last modified -# more than 120 minutes ago is deleted. -# -# notes to self: as long as this runs as root do not worry -# about quota problems or disk space - -use strict; - -my ($upload_dir) = "/home/ftp/classpath/incoming"; -my ($public_dir) = "/home/ftp/classpath/pub/patches"; -my ($user) = "classpath"; -my ($group) = "classpath"; -my ($mode_dir) = "775"; -my ($mode_file) = "664"; -my (@patches) = (); - -use vars qw($upload_dir $public_dir @patches $user $group - $mode_dir $mode_file); - -# main -{ - @patches = &getPatches(); - &movePatches(@patches); -} - -#--------------------------------------------------------------- -# Purpose: To remove files not matching the correct pattern. -# To remove README files without patches (last modified greater -# than 2 hours). To remove patches without README files (last -# modified greater than 2 hours). -#--------------------------------------------------------------- -sub getPatches -{ - my (@patches) = (); - my (@entries) = (); - my (%maybe) = (); - my ($entry, $debug, $prefix, $junk, $file, $patch, $readme) = ""; - my ($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size, $atime, - $mtime, $ctime, $blksize, $blocks) = ""; - - $debug = 1; - - opendir(INCOMING, "$upload_dir") || die "could not open $upload_dir\n"; - @entries = grep( !/^\.\S+/, readdir(INCOMING)); # no .* - closedir(INCOMING); - foreach $entry (sort @entries) - { - if (($entry eq ".") || ($entry eq "..")) { next; } - if (-d "$upload_dir/$entry") - { - print "Directory: $upload_dir/$entry/\n"; - } - elsif (-e "$upload_dir/$entry") - { - if ($entry eq ".message") { next; } - if ($entry eq "README") { next; } - if ($entry !~ /^\w+-\d\d\d\d\d\d-\d+\.patch\.(gz|README)$/) - { - print "REGEX FAILED: $entry\n"; - unlink("$upload_dir/$entry"); - } - else - { - ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime, - $ctime,$blksize,$blocks) = stat("$upload_dir/$entry"); - if ($size > 512000) - { - print "LARGE PATCH: $entry\n"; - unlink("$upload_dir/$entry"); - } - else - { - ($prefix,$junk) = split(/(\.gz|\.README)/, $entry, 2); - $maybe{$prefix} += 1; - } - } - } - } - - foreach $entry (keys(%maybe)) - { - if ($maybe{$entry} == 2) - { - $patch = "$entry.gz"; - $readme = "$entry.README"; - - ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime, - $ctime,$blksize,$blocks) = stat($patch); - if (time-$mtime > 900) - { - ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime, - $ctime,$blksize,$blocks) = stat($readme); - if (time-$mtime > 900) - { - $patches[$#patches+1] = $entry; - } - } - } - else - { - if (-e "$upload_dir/$entry.gz") - { - unlink("$upload_dir/$entry.gz"); - print "STALE PATCH: $entry.gz\n"; - } - elsif (-e "$upload_dir/$entry.README") - { - unlink("$upload_dir/$entry.README"); - print "STALE README: $entry.README\n"; - } - } - } - return (@patches); -} - -#--------------------------------------------------------------- -# Purpose: To move the patches to the proper directory and set -# the permissions correctly. -#--------------------------------------------------------------- -sub movePatches -{ - my (@patches) = @_; - my ($patch) = ""; - my ($fail) = 0; - - if (!(-d "$public_dir")) - { - system("mkdir -p $public_dir"); - system("chown $user.$group $public_dir"); - system("chmod $mode_dir $public_dir"); - } - foreach $patch (@patches) - { - if (-e "$public_dir/$patch.gz") - { - print "Patch exists: $public_dir/$patch.gz\n"; - $fail = 1; - } - if (-e "$public_dir/$patch.README") - { - print "README exists: $public_dir/$patch.README\n"; - $fail = 1; - } - if ($fail == 0) - { - system("mv $upload_dir/$patch.gz $public_dir/$patch.gz"); - system("mv $upload_dir/$patch.README $public_dir/$patch.README"); - system("chown $user.$group $public_dir/*"); - system("chmod $mode_file $public_dir/*"); - open(MAIL, "|mail -s \"Classpath: $patch uploaded\" core\@classpath.org") || die "could not open mail\n"; - print MAIL "GNU Classpath FTP Maintenance\n"; - print MAIL "\n"; - print MAIL "Added Files:\n"; - print MAIL "ftp://ftp.classpath.org/pub/patches/$patch.gz\n"; - print MAIL "ftp://ftp.classpath.org/pub/patches/$patch.README\n\n"; - close(MAIL); - } - } -} |