Fold the inode and digest trees into a single structure that shares the non-leaf...
[dupemerge] / dm6
1 #!/usr/bin/perl
2 use warnings;
3 use strict;
4 use Digest::SHA1 qw(sha1 sha1_hex sha1_base64);
5 use Fcntl qw(:DEFAULT :flock);
6 use File::Compare;
7 use File::Path;
8 use File::Temp;
9 use File::stat;
10
11 # Copyright (C) 2010 Zygo Blaxell <dm5@mailtoo.hungrycats.org>
12
13 # This program is free software; you can redistribute it and/or modify
14 # it under the terms of the GNU General Public License as published by
15 # the Free Software Foundation; either version 2 of the License, or
16 # (at your option) any later version.
17
18 # This program is distributed in the hope that it will be useful,
19 # but WITHOUT ANY WARRANTY; without even the implied warranty of
20 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
21 # GNU General Public License for more details.
22
23 # You should have received a copy of the GNU General Public License
24 # along with this program; if not, write to the Free Software
25 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
26
27 sub digest {
28         my ($filename) = (@_);
29         die "'$filename' is not a plain file" if (-l $filename) || ! (-f _);
30         my $ctx = Digest::SHA1->new;
31         sysopen(FILE, $filename, O_RDONLY|O_NONBLOCK) or die "open: $filename: $!";
32         binmode(FILE);          # FIXME:  Necessary?  Probably harmless...
33         $ctx->addfile(\*FILE);
34         close(FILE) or die "close: $filename: $!";
35         return $ctx->b64digest;
36 }
37
38 sub usage {
39         die <<USAGE;
40 Usage: $0 link-dir
41 Hashes a NUL-separated list of files on stdin into link-dir.
42
43 Version: 20100513.0
44 USAGE
45 }
46
47 # Link files
48 sub link_files {
49         my ($from, $to) = (@_);
50
51         print STDERR 'T';
52         my $inode_dir = $to;
53         my $inode_base = $to;
54         $inode_dir =~ s:[^/]*$::o;
55         $inode_base =~ s:^.*/::os;
56         my $tmp_to = File::Temp::tempnam($inode_dir, ".$inode_base.");
57         print STDERR "\bL";
58         link($from, $tmp_to) or die "link: $from -> $tmp_to: $!";
59         print STDERR "\bR";
60         unless (rename($tmp_to, $to)) {
61                 my $saved_bang = $!;
62                 print STDERR "\bU";
63                 unlink($tmp_to) or warn "unlink: $tmp_to: $!";  # Try, possibly in vain, to clean up
64                 die "rename: $tmp_to -> $from: $saved_bang";
65         }
66         print STDERR "\b";
67 }
68
69 my $link_dir = shift @ARGV;
70 (-d $link_dir) or usage;
71
72 my $prefix_length = 3;
73
74 sub slash_prefix {
75         my ($file) = @_;
76         $file .= '_' x (length($file) + 1 - $prefix_length) if length($file) + 1 < $prefix_length;
77         my $prefix = substr($file, 0, $prefix_length);
78         my $suffix = substr($file, $prefix_length);
79         $prefix =~ s:(.):$1/:osg;
80         chop($prefix);
81         return ($prefix, $suffix);
82 }
83
84 sub mkdir_p {
85         my ($dir) = @_;
86         return if -d $dir;
87         $dir =~ s:/+$::os;
88         my $parent;
89         ($parent = $dir) =~ s:[^/]+$::os;
90         if ($parent ne $dir) {
91                 mkdir_p($parent);
92                 print STDERR 'm';
93                 mkdir($dir) or die "mkdir: $dir: $!";
94         }
95         die "mkdir: $dir: $!" unless -d $dir;
96 }
97
98 sub prepare_parents {
99         my ($link_dir, $file) = @_;
100         my ($prefix, $suffix) = slash_prefix($file);
101         my $parent = "$link_dir/$prefix";
102         mkdir_p($parent);
103         return "$parent/$suffix";
104 }
105
106 # ext3 cannot handle more than 32000 links to a file.  Leave some headroom.
107 my $link_count_max = 31990;
108
109 $/ = "\0";
110 while (<STDIN>) {
111         my $file = $_;
112         eval {
113                 for (1) {
114                         chomp $file;
115
116                         # Get file stat data
117                         print STDERR '.';
118                         my $st = lstat($file);
119                         die "lstat: $file: $!" unless $st;
120
121                         # Oops?
122                         next unless -f _;
123
124                         # Skip the file if it has far too many links already
125                         next if ($st->nlink > $link_count_max);
126
127                         # Check link to inode
128                         my $inode_link = prepare_parents($link_dir, $st->ino . 'I');
129                         print STDERR 'I';
130                         my $inode_st = lstat($inode_link);
131                         my $update_links;
132                         if ($inode_st) {
133                                 my $inode_dev = $inode_st->dev;
134                                 my $inode_ino = $inode_st->ino;
135                                 my $file_dev = $st->dev;
136                                 my $file_ino = $st->ino;
137                                 if ($inode_ino != $file_ino || $inode_dev != $file_dev) {
138                                         warn "inode link '$inode_link' is wrong (inode $inode_ino should be $file_ino)" if $inode_ino != $file_ino;
139                                         warn "inode link '$inode_link' is wrong (dev $inode_dev should be $file_dev)" if $inode_dev != $file_dev;
140                                         $update_links = 1;
141                                 }
142                         } else {
143                                 $update_links = 1;
144                         }
145                         print STDERR "\b";
146
147                         # If neither criteria for updating link is met, leave it as-is
148                         next unless $update_links;
149
150                         # Compute digest
151                         print STDERR 'd';
152                         my $digest = digest($file);
153                         print STDERR "\b";
154
155                         # Base64 uses /, we prefer _
156                         $digest =~ y:/:_:;
157
158                         # Check link to digest
159                         my $digest_link = prepare_parents($link_dir, "${digest}D");
160                         print STDERR 'D';
161                         my $digest_st = lstat($digest_link);
162                         if ($digest_st) {
163                                 my $digest_nlink = $digest_st->nlink;
164                                 if ($digest_nlink > 31990) {
165                                         print STDERR 'u';
166                                         unlink($digest_link) or die "unlink: $digest_link: $!";
167                                         undef $digest_st;
168                                 }
169                         }
170                         print STDERR "\b";
171
172                         # Which file are we keeping?
173                         my $keep_ino;
174
175                         # If digest link exists, link it to file
176                         if ($digest_st) {
177                                 print STDERR 'c';
178                                 die "NOT identical!" if compare($digest_link, $file);
179
180                                 # Old, replace input with old file
181                                 print STDERR '-';
182                                 link_files($digest_link, $file);
183                                 $keep_ino = $digest_st->ino;
184                         } else {
185                                 # New, add input to digest
186                                 print STDERR '+';
187                                 link_files($file, $digest_link);
188                                 $keep_ino = $st->ino;
189                         }
190
191                         # A link to the inode indicates we are done, so do it last
192                         $inode_link = prepare_parents($link_dir, "${keep_ino}I");
193                         print STDERR ' ';
194                         link_files($digest_link, $inode_link);
195
196                 }
197         };
198         warn "$file: $@" if $@;
199 }
200
201 # Garbage collection
202 print STDERR "\nGarbage collection in '$link_dir'...";
203 chdir($link_dir) || die "chdir: $link_dir: $!";
204 print STDERR "\nRemoving files with link count < 3...";
205 system("find . -type f -links -3 -print0 | xargs -0 rm -f") and die "system: exit status $?";
206 print STDERR "\nRemoving empty directories...";
207 system("find . -type d -empty -print0 | xargs -0r rmdir -p --ignore-fail-on-non-empty") and die "system: exit status $?";
208 print STDERR "\nDone.\n";
209
210 exit(0);
211
212 __END__
213
214 #################################################################################
215 #                     GNU GENERAL PUBLIC LICENSE                                #
216 #                        Version 2, June 1991                                   #
217 #                                                                               #
218 #  Copyright (C) 1989, 1991 Free Software Foundation, Inc.                      #
219 #      59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                  #
220 #  Everyone is permitted to copy and distribute verbatim copies                 #
221 #  of this license document, but changing it is not allowed.                    #
222 #                                                                               #
223 #                             Preamble                                          #
224 #                                                                               #
225 #   The licenses for most software are designed to take away your               #
226 # freedom to share and change it.  By contrast, the GNU General Public          #
227 # License is intended to guarantee your freedom to share and change free        #
228 # software--to make sure the software is free for all its users.  This          #
229 # General Public License applies to most of the Free Software                   #
230 # Foundation's software and to any other program whose authors commit to        #
231 # using it.  (Some other Free Software Foundation software is covered by        #
232 # the GNU Library General Public License instead.)  You can apply it to         #
233 # your programs, too.                                                           #
234 #                                                                               #
235 #   When we speak of free software, we are referring to freedom, not            #
236 # price.  Our General Public Licenses are designed to make sure that you        #
237 # have the freedom to distribute copies of free software (and charge for        #
238 # this service if you wish), that you receive source code or can get it         #
239 # if you want it, that you can change the software or use pieces of it          #
240 # in new free programs; and that you know you can do these things.              #
241 #                                                                               #
242 #   To protect your rights, we need to make restrictions that forbid            #
243 # anyone to deny you these rights or to ask you to surrender the rights.        #
244 # These restrictions translate to certain responsibilities for you if you       #
245 # distribute copies of the software, or if you modify it.                       #
246 #                                                                               #
247 #   For example, if you distribute copies of such a program, whether            #
248 # gratis or for a fee, you must give the recipients all the rights that         #
249 # you have.  You must make sure that they, too, receive or can get the          #
250 # source code.  And you must show them these terms so they know their           #
251 # rights.                                                                       #
252 #                                                                               #
253 #   We protect your rights with two steps: (1) copyright the software, and      #
254 # (2) offer you this license which gives you legal permission to copy,          #
255 # distribute and/or modify the software.                                        #
256 #                                                                               #
257 #   Also, for each author's protection and ours, we want to make certain        #
258 # that everyone understands that there is no warranty for this free             #
259 # software.  If the software is modified by someone else and passed on, we      #
260 # want its recipients to know that what they have is not the original, so       #
261 # that any problems introduced by others will not reflect on the original       #
262 # authors' reputations.                                                         #
263 #                                                                               #
264 #   Finally, any free program is threatened constantly by software              #
265 # patents.  We wish to avoid the danger that redistributors of a free           #
266 # program will individually obtain patent licenses, in effect making the        #
267 # program proprietary.  To prevent this, we have made it clear that any         #
268 # patent must be licensed for everyone's free use or not licensed at all.       #
269 #                                                                               #
270 #   The precise terms and conditions for copying, distribution and              #
271 # modification follow.                                                          #
272 #                                                                               #
273 #                     GNU GENERAL PUBLIC LICENSE                                #
274 #    TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION            #
275 #                                                                               #
276 #   0. This License applies to any program or other work which contains         #
277 # a notice placed by the copyright holder saying it may be distributed          #
278 # under the terms of this General Public License.  The "Program", below,        #
279 # refers to any such program or work, and a "work based on the Program"         #
280 # means either the Program or any derivative work under copyright law:          #
281 # that is to say, a work containing the Program or a portion of it,             #
282 # either verbatim or with modifications and/or translated into another          #
283 # language.  (Hereinafter, translation is included without limitation in        #
284 # the term "modification".)  Each licensee is addressed as "you".               #
285 #                                                                               #
286 # Activities other than copying, distribution and modification are not          #
287 # covered by this License; they are outside its scope.  The act of              #
288 # running the Program is not restricted, and the output from the Program        #
289 # is covered only if its contents constitute a work based on the                #
290 # Program (independent of having been made by running the Program).             #
291 # Whether that is true depends on what the Program does.                        #
292 #                                                                               #
293 #   1. You may copy and distribute verbatim copies of the Program's             #
294 # source code as you receive it, in any medium, provided that you               #
295 # conspicuously and appropriately publish on each copy an appropriate           #
296 # copyright notice and disclaimer of warranty; keep intact all the              #
297 # notices that refer to this License and to the absence of any warranty;        #
298 # and give any other recipients of the Program a copy of this License           #
299 # along with the Program.                                                       #
300 #                                                                               #
301 # You may charge a fee for the physical act of transferring a copy, and         #
302 # you may at your option offer warranty protection in exchange for a fee.       #
303 #                                                                               #
304 #   2. You may modify your copy or copies of the Program or any portion         #
305 # of it, thus forming a work based on the Program, and copy and                 #
306 # distribute such modifications or work under the terms of Section 1            #
307 # above, provided that you also meet all of these conditions:                   #
308 #                                                                               #
309 #     a) You must cause the modified files to carry prominent notices           #
310 #     stating that you changed the files and the date of any change.            #
311 #                                                                               #
312 #     b) You must cause any work that you distribute or publish, that in        #
313 #     whole or in part contains or is derived from the Program or any           #
314 #     part thereof, to be licensed as a whole at no charge to all third         #
315 #     parties under the terms of this License.                                  #
316 #                                                                               #
317 #     c) If the modified program normally reads commands interactively          #
318 #     when run, you must cause it, when started running for such                #
319 #     interactive use in the most ordinary way, to print or display an          #
320 #     announcement including an appropriate copyright notice and a              #
321 #     notice that there is no warranty (or else, saying that you provide        #
322 #     a warranty) and that users may redistribute the program under             #
323 #     these conditions, and telling the user how to view a copy of this         #
324 #     License.  (Exception: if the Program itself is interactive but            #
325 #     does not normally print such an announcement, your work based on          #
326 #     the Program is not required to print an announcement.)                    #
327 #                                                                               #
328 # These requirements apply to the modified work as a whole.  If                 #
329 # identifiable sections of that work are not derived from the Program,          #
330 # and can be reasonably considered independent and separate works in            #
331 # themselves, then this License, and its terms, do not apply to those           #
332 # sections when you distribute them as separate works.  But when you            #
333 # distribute the same sections as part of a whole which is a work based         #
334 # on the Program, the distribution of the whole must be on the terms of         #
335 # this License, whose permissions for other licensees extend to the             #
336 # entire whole, and thus to each and every part regardless of who wrote it.     #
337 #                                                                               #
338 # Thus, it is not the intent of this section to claim rights or contest         #
339 # your rights to work written entirely by you; rather, the intent is to         #
340 # exercise the right to control the distribution of derivative or               #
341 # collective works based on the Program.                                        #
342 #                                                                               #
343 # In addition, mere aggregation of another work not based on the Program        #
344 # with the Program (or with a work based on the Program) on a volume of         #
345 # a storage or distribution medium does not bring the other work under          #
346 # the scope of this License.                                                    #
347 #                                                                               #
348 #   3. You may copy and distribute the Program (or a work based on it,          #
349 # under Section 2) in object code or executable form under the terms of         #
350 # Sections 1 and 2 above provided that you also do one of the following:        #
351 #                                                                               #
352 #     a) Accompany it with the complete corresponding machine-readable          #
353 #     source code, which must be distributed under the terms of Sections        #
354 #     1 and 2 above on a medium customarily used for software interchange; or,  #
355 #                                                                               #
356 #     b) Accompany it with a written offer, valid for at least three            #
357 #     years, to give any third party, for a charge no more than your            #
358 #     cost of physically performing source distribution, a complete             #
359 #     machine-readable copy of the corresponding source code, to be             #
360 #     distributed under the terms of Sections 1 and 2 above on a medium         #
361 #     customarily used for software interchange; or,                            #
362 #                                                                               #
363 #     c) Accompany it with the information you received as to the offer         #
364 #     to distribute corresponding source code.  (This alternative is            #
365 #     allowed only for noncommercial distribution and only if you               #
366 #     received the program in object code or executable form with such          #
367 #     an offer, in accord with Subsection b above.)                             #
368 #                                                                               #
369 # The source code for a work means the preferred form of the work for           #
370 # making modifications to it.  For an executable work, complete source          #
371 # code means all the source code for all modules it contains, plus any          #
372 # associated interface definition files, plus the scripts used to               #
373 # control compilation and installation of the executable.  However, as a        #
374 # special exception, the source code distributed need not include               #
375 # anything that is normally distributed (in either source or binary             #
376 # form) with the major components (compiler, kernel, and so on) of the          #
377 # operating system on which the executable runs, unless that component          #
378 # itself accompanies the executable.                                            #
379 #                                                                               #
380 # If distribution of executable or object code is made by offering              #
381 # access to copy from a designated place, then offering equivalent              #
382 # access to copy the source code from the same place counts as                  #
383 # distribution of the source code, even though third parties are not            #
384 # compelled to copy the source along with the object code.                      #
385 #                                                                               #
386 #   4. You may not copy, modify, sublicense, or distribute the Program          #
387 # except as expressly provided under this License.  Any attempt                 #
388 # otherwise to copy, modify, sublicense or distribute the Program is            #
389 # void, and will automatically terminate your rights under this License.        #
390 # However, parties who have received copies, or rights, from you under          #
391 # this License will not have their licenses terminated so long as such          #
392 # parties remain in full compliance.                                            #
393 #                                                                               #
394 #   5. You are not required to accept this License, since you have not          #
395 # signed it.  However, nothing else grants you permission to modify or          #
396 # distribute the Program or its derivative works.  These actions are            #
397 # prohibited by law if you do not accept this License.  Therefore, by           #
398 # modifying or distributing the Program (or any work based on the               #
399 # Program), you indicate your acceptance of this License to do so, and          #
400 # all its terms and conditions for copying, distributing or modifying           #
401 # the Program or works based on it.                                             #
402 #                                                                               #
403 #   6. Each time you redistribute the Program (or any work based on the         #
404 # Program), the recipient automatically receives a license from the             #
405 # original licensor to copy, distribute or modify the Program subject to        #
406 # these terms and conditions.  You may not impose any further                   #
407 # restrictions on the recipients' exercise of the rights granted herein.        #
408 # You are not responsible for enforcing compliance by third parties to          #
409 # this License.                                                                 #
410 #                                                                               #
411 #   7. If, as a consequence of a court judgment or allegation of patent         #
412 # infringement or for any other reason (not limited to patent issues),          #
413 # conditions are imposed on you (whether by court order, agreement or           #
414 # otherwise) that contradict the conditions of this License, they do not        #
415 # excuse you from the conditions of this License.  If you cannot                #
416 # distribute so as to satisfy simultaneously your obligations under this        #
417 # License and any other pertinent obligations, then as a consequence you        #
418 # may not distribute the Program at all.  For example, if a patent              #
419 # license would not permit royalty-free redistribution of the Program by        #
420 # all those who receive copies directly or indirectly through you, then         #
421 # the only way you could satisfy both it and this License would be to           #
422 # refrain entirely from distribution of the Program.                            #
423 #                                                                               #
424 # If any portion of this section is held invalid or unenforceable under         #
425 # any particular circumstance, the balance of the section is intended to        #
426 # apply and the section as a whole is intended to apply in other                #
427 # circumstances.                                                                #
428 #                                                                               #
429 # It is not the purpose of this section to induce you to infringe any           #
430 # patents or other property right claims or to contest validity of any          #
431 # such claims; this section has the sole purpose of protecting the              #
432 # integrity of the free software distribution system, which is                  #
433 # implemented by public license practices.  Many people have made               #
434 # generous contributions to the wide range of software distributed              #
435 # through that system in reliance on consistent application of that             #
436 # system; it is up to the author/donor to decide if he or she is willing        #
437 # to distribute software through any other system and a licensee cannot         #
438 # impose that choice.                                                           #
439 #                                                                               #
440 # This section is intended to make thoroughly clear what is believed to         #
441 # be a consequence of the rest of this License.                                 #
442 #                                                                               #
443 #   8. If the distribution and/or use of the Program is restricted in           #
444 # certain countries either by patents or by copyrighted interfaces, the         #
445 # original copyright holder who places the Program under this License           #
446 # may add an explicit geographical distribution limitation excluding            #
447 # those countries, so that distribution is permitted only in or among           #
448 # countries not thus excluded.  In such case, this License incorporates         #
449 # the limitation as if written in the body of this License.                     #
450 #                                                                               #
451 #   9. The Free Software Foundation may publish revised and/or new versions     #
452 # of the General Public License from time to time.  Such new versions will      #
453 # be similar in spirit to the present version, but may differ in detail to      #
454 # address new problems or concerns.                                             #
455 #                                                                               #
456 # Each version is given a distinguishing version number.  If the Program        #
457 # specifies a version number of this License which applies to it and "any       #
458 # later version", you have the option of following the terms and conditions     #
459 # either of that version or of any later version published by the Free          #
460 # Software Foundation.  If the Program does not specify a version number of     #
461 # this License, you may choose any version ever published by the Free Software  #
462 # Foundation.                                                                   #
463 #                                                                               #
464 #   10. If you wish to incorporate parts of the Program into other free         #
465 # programs whose distribution conditions are different, write to the author     #
466 # to ask for permission.  For software which is copyrighted by the Free         #
467 # Software Foundation, write to the Free Software Foundation; we sometimes      #
468 # make exceptions for this.  Our decision will be guided by the two goals       #
469 # of preserving the free status of all derivatives of our free software and     #
470 # of promoting the sharing and reuse of software generally.                     #
471 #                                                                               #
472 #                             NO WARRANTY                                       #
473 #                                                                               #
474 #   11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY    #
475 # FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN      #
476 # OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES        #
477 # PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED    #
478 # OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF          #
479 # MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE RISK AS     #
480 # TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.  SHOULD THE        #
481 # PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,      #
482 # REPAIR OR CORRECTION.                                                         #
483 #                                                                               #
484 #   12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING   #
485 # WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR           #
486 # REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,    #
487 # INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING   #
488 # OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED     #
489 # TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY      #
490 # YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER    #
491 # PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE         #
492 # POSSIBILITY OF SUCH DAMAGES.                                                  #
493 #                                                                               #
494 #                      END OF TERMS AND CONDITIONS                              #
495 #                                                                               #
496 #             How to Apply These Terms to Your New Programs                     #
497 #                                                                               #
498 #   If you develop a new program, and you want it to be of the greatest         #
499 # possible use to the public, the best way to achieve this is to make it        #
500 # free software which everyone can redistribute and change under these terms.   #
501 #                                                                               #
502 #   To do so, attach the following notices to the program.  It is safest        #
503 # to attach them to the start of each source file to most effectively           #
504 # convey the exclusion of warranty; and each file should have at least          #
505 # the "copyright" line and a pointer to where the full notice is found.         #
506 #                                                                               #
507 #     <one line to give the program's name and a brief idea of what it does.>   #
508 #     Copyright (C) <year>  <name of author>                                    #
509 #                                                                               #
510 #     This program is free software; you can redistribute it and/or modify      #
511 #     it under the terms of the GNU General Public License as published by      #
512 #     the Free Software Foundation; either version 2 of the License, or         #
513 #     (at your option) any later version.                                       #
514 #                                                                               #
515 #     This program is distributed in the hope that it will be useful,           #
516 #     but WITHOUT ANY WARRANTY; without even the implied warranty of            #
517 #     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the             #
518 #     GNU General Public License for more details.                              #
519 #                                                                               #
520 #     You should have received a copy of the GNU General Public License         #
521 #     along with this program; if not, write to the Free Software               #
522 #     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA #
523 #                                                                               #
524 #                                                                               #
525 # Also add information on how to contact you by electronic and paper mail.      #
526 #                                                                               #
527 # If the program is interactive, make it output a short notice like this        #
528 # when it starts in an interactive mode:                                        #
529 #                                                                               #
530 #     Gnomovision version 69, Copyright (C) year  name of author                #
531 #     Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. #
532 #     This is free software, and you are welcome to redistribute it             #
533 #     under certain conditions; type `show c' for details.                      #
534 #                                                                               #
535 # The hypothetical commands `show w' and `show c' should show the appropriate   #
536 # parts of the General Public License.  Of course, the commands you use may     #
537 # be called something other than `show w' and `show c'; they could even be      #
538 # mouse-clicks or menu items--whatever suits your program.                      #
539 #                                                                               #
540 # You should also get your employer (if you work as a programmer) or your       #
541 # school, if any, to sign a "copyright disclaimer" for the program, if          #
542 # necessary.  Here is a sample; alter the names:                                #
543 #                                                                               #
544 #   Yoyodyne, Inc., hereby disclaims all copyright interest in the program      #
545 #   `Gnomovision' (which makes passes at compilers) written by James Hacker.    #
546 #                                                                               #
547 #   <signature of Ty Coon>, 1 April 1989                                        #
548 #   Ty Coon, President of Vice                                                  #
549 #                                                                               #
550 # This General Public License does not permit incorporating your program into   #
551 # proprietary programs.  If your program is a subroutine library, you may       #
552 # consider it more useful to permit linking proprietary applications with the   #
553 # library.  If this is what you want to do, use the GNU Library General         #
554 # Public License instead of this License.                                       #
555 #################################################################################