Flatten git2cl submodule
This commit is contained in:
Andrew Waterman
parent
5a7f86b2f4
commit
b3ddfc70e8
|
|
@ -1,6 +1,3 @@
|
||||||
[submodule "tools/git2cl"]
|
|
||||||
path = tools/git2cl
|
|
||||||
url = http://repo.or.cz/r/git2cl.git
|
|
||||||
[submodule "jimtcl"]
|
[submodule "jimtcl"]
|
||||||
path = jimtcl
|
path = jimtcl
|
||||||
url = https://github.com/msteveb/jimtcl
|
url = https://github.com/msteveb/jimtcl
|
||||||
|
|
|
||||||
|
|
@ -1 +0,0 @@
|
||||||
Subproject commit 8373c9f74993e218a08819cbcdbab3f3564bbeba
|
|
||||||
|
|
@ -0,0 +1,339 @@
|
||||||
|
GNU GENERAL PUBLIC LICENSE
|
||||||
|
Version 2, June 1991
|
||||||
|
|
||||||
|
Copyright (C) 1989, 1991 Free Software Foundation, Inc.,
|
||||||
|
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||||||
|
Everyone is permitted to copy and distribute verbatim copies
|
||||||
|
of this license document, but changing it is not allowed.
|
||||||
|
|
||||||
|
Preamble
|
||||||
|
|
||||||
|
The licenses for most software are designed to take away your
|
||||||
|
freedom to share and change it. By contrast, the GNU General Public
|
||||||
|
License is intended to guarantee your freedom to share and change free
|
||||||
|
software--to make sure the software is free for all its users. This
|
||||||
|
General Public License applies to most of the Free Software
|
||||||
|
Foundation's software and to any other program whose authors commit to
|
||||||
|
using it. (Some other Free Software Foundation software is covered by
|
||||||
|
the GNU Lesser General Public License instead.) You can apply it to
|
||||||
|
your programs, too.
|
||||||
|
|
||||||
|
When we speak of free software, we are referring to freedom, not
|
||||||
|
price. Our General Public Licenses are designed to make sure that you
|
||||||
|
have the freedom to distribute copies of free software (and charge for
|
||||||
|
this service if you wish), that you receive source code or can get it
|
||||||
|
if you want it, that you can change the software or use pieces of it
|
||||||
|
in new free programs; and that you know you can do these things.
|
||||||
|
|
||||||
|
To protect your rights, we need to make restrictions that forbid
|
||||||
|
anyone to deny you these rights or to ask you to surrender the rights.
|
||||||
|
These restrictions translate to certain responsibilities for you if you
|
||||||
|
distribute copies of the software, or if you modify it.
|
||||||
|
|
||||||
|
For example, if you distribute copies of such a program, whether
|
||||||
|
gratis or for a fee, you must give the recipients all the rights that
|
||||||
|
you have. You must make sure that they, too, receive or can get the
|
||||||
|
source code. And you must show them these terms so they know their
|
||||||
|
rights.
|
||||||
|
|
||||||
|
We protect your rights with two steps: (1) copyright the software, and
|
||||||
|
(2) offer you this license which gives you legal permission to copy,
|
||||||
|
distribute and/or modify the software.
|
||||||
|
|
||||||
|
Also, for each author's protection and ours, we want to make certain
|
||||||
|
that everyone understands that there is no warranty for this free
|
||||||
|
software. If the software is modified by someone else and passed on, we
|
||||||
|
want its recipients to know that what they have is not the original, so
|
||||||
|
that any problems introduced by others will not reflect on the original
|
||||||
|
authors' reputations.
|
||||||
|
|
||||||
|
Finally, any free program is threatened constantly by software
|
||||||
|
patents. We wish to avoid the danger that redistributors of a free
|
||||||
|
program will individually obtain patent licenses, in effect making the
|
||||||
|
program proprietary. To prevent this, we have made it clear that any
|
||||||
|
patent must be licensed for everyone's free use or not licensed at all.
|
||||||
|
|
||||||
|
The precise terms and conditions for copying, distribution and
|
||||||
|
modification follow.
|
||||||
|
|
||||||
|
GNU GENERAL PUBLIC LICENSE
|
||||||
|
TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
|
||||||
|
|
||||||
|
0. This License applies to any program or other work which contains
|
||||||
|
a notice placed by the copyright holder saying it may be distributed
|
||||||
|
under the terms of this General Public License. The "Program", below,
|
||||||
|
refers to any such program or work, and a "work based on the Program"
|
||||||
|
means either the Program or any derivative work under copyright law:
|
||||||
|
that is to say, a work containing the Program or a portion of it,
|
||||||
|
either verbatim or with modifications and/or translated into another
|
||||||
|
language. (Hereinafter, translation is included without limitation in
|
||||||
|
the term "modification".) Each licensee is addressed as "you".
|
||||||
|
|
||||||
|
Activities other than copying, distribution and modification are not
|
||||||
|
covered by this License; they are outside its scope. The act of
|
||||||
|
running the Program is not restricted, and the output from the Program
|
||||||
|
is covered only if its contents constitute a work based on the
|
||||||
|
Program (independent of having been made by running the Program).
|
||||||
|
Whether that is true depends on what the Program does.
|
||||||
|
|
||||||
|
1. You may copy and distribute verbatim copies of the Program's
|
||||||
|
source code as you receive it, in any medium, provided that you
|
||||||
|
conspicuously and appropriately publish on each copy an appropriate
|
||||||
|
copyright notice and disclaimer of warranty; keep intact all the
|
||||||
|
notices that refer to this License and to the absence of any warranty;
|
||||||
|
and give any other recipients of the Program a copy of this License
|
||||||
|
along with the Program.
|
||||||
|
|
||||||
|
You may charge a fee for the physical act of transferring a copy, and
|
||||||
|
you may at your option offer warranty protection in exchange for a fee.
|
||||||
|
|
||||||
|
2. You may modify your copy or copies of the Program or any portion
|
||||||
|
of it, thus forming a work based on the Program, and copy and
|
||||||
|
distribute such modifications or work under the terms of Section 1
|
||||||
|
above, provided that you also meet all of these conditions:
|
||||||
|
|
||||||
|
a) You must cause the modified files to carry prominent notices
|
||||||
|
stating that you changed the files and the date of any change.
|
||||||
|
|
||||||
|
b) You must cause any work that you distribute or publish, that in
|
||||||
|
whole or in part contains or is derived from the Program or any
|
||||||
|
part thereof, to be licensed as a whole at no charge to all third
|
||||||
|
parties under the terms of this License.
|
||||||
|
|
||||||
|
c) If the modified program normally reads commands interactively
|
||||||
|
when run, you must cause it, when started running for such
|
||||||
|
interactive use in the most ordinary way, to print or display an
|
||||||
|
announcement including an appropriate copyright notice and a
|
||||||
|
notice that there is no warranty (or else, saying that you provide
|
||||||
|
a warranty) and that users may redistribute the program under
|
||||||
|
these conditions, and telling the user how to view a copy of this
|
||||||
|
License. (Exception: if the Program itself is interactive but
|
||||||
|
does not normally print such an announcement, your work based on
|
||||||
|
the Program is not required to print an announcement.)
|
||||||
|
|
||||||
|
These requirements apply to the modified work as a whole. If
|
||||||
|
identifiable sections of that work are not derived from the Program,
|
||||||
|
and can be reasonably considered independent and separate works in
|
||||||
|
themselves, then this License, and its terms, do not apply to those
|
||||||
|
sections when you distribute them as separate works. But when you
|
||||||
|
distribute the same sections as part of a whole which is a work based
|
||||||
|
on the Program, the distribution of the whole must be on the terms of
|
||||||
|
this License, whose permissions for other licensees extend to the
|
||||||
|
entire whole, and thus to each and every part regardless of who wrote it.
|
||||||
|
|
||||||
|
Thus, it is not the intent of this section to claim rights or contest
|
||||||
|
your rights to work written entirely by you; rather, the intent is to
|
||||||
|
exercise the right to control the distribution of derivative or
|
||||||
|
collective works based on the Program.
|
||||||
|
|
||||||
|
In addition, mere aggregation of another work not based on the Program
|
||||||
|
with the Program (or with a work based on the Program) on a volume of
|
||||||
|
a storage or distribution medium does not bring the other work under
|
||||||
|
the scope of this License.
|
||||||
|
|
||||||
|
3. You may copy and distribute the Program (or a work based on it,
|
||||||
|
under Section 2) in object code or executable form under the terms of
|
||||||
|
Sections 1 and 2 above provided that you also do one of the following:
|
||||||
|
|
||||||
|
a) Accompany it with the complete corresponding machine-readable
|
||||||
|
source code, which must be distributed under the terms of Sections
|
||||||
|
1 and 2 above on a medium customarily used for software interchange; or,
|
||||||
|
|
||||||
|
b) Accompany it with a written offer, valid for at least three
|
||||||
|
years, to give any third party, for a charge no more than your
|
||||||
|
cost of physically performing source distribution, a complete
|
||||||
|
machine-readable copy of the corresponding source code, to be
|
||||||
|
distributed under the terms of Sections 1 and 2 above on a medium
|
||||||
|
customarily used for software interchange; or,
|
||||||
|
|
||||||
|
c) Accompany it with the information you received as to the offer
|
||||||
|
to distribute corresponding source code. (This alternative is
|
||||||
|
allowed only for noncommercial distribution and only if you
|
||||||
|
received the program in object code or executable form with such
|
||||||
|
an offer, in accord with Subsection b above.)
|
||||||
|
|
||||||
|
The source code for a work means the preferred form of the work for
|
||||||
|
making modifications to it. For an executable work, complete source
|
||||||
|
code means all the source code for all modules it contains, plus any
|
||||||
|
associated interface definition files, plus the scripts used to
|
||||||
|
control compilation and installation of the executable. However, as a
|
||||||
|
special exception, the source code distributed need not include
|
||||||
|
anything that is normally distributed (in either source or binary
|
||||||
|
form) with the major components (compiler, kernel, and so on) of the
|
||||||
|
operating system on which the executable runs, unless that component
|
||||||
|
itself accompanies the executable.
|
||||||
|
|
||||||
|
If distribution of executable or object code is made by offering
|
||||||
|
access to copy from a designated place, then offering equivalent
|
||||||
|
access to copy the source code from the same place counts as
|
||||||
|
distribution of the source code, even though third parties are not
|
||||||
|
compelled to copy the source along with the object code.
|
||||||
|
|
||||||
|
4. You may not copy, modify, sublicense, or distribute the Program
|
||||||
|
except as expressly provided under this License. Any attempt
|
||||||
|
otherwise to copy, modify, sublicense or distribute the Program is
|
||||||
|
void, and will automatically terminate your rights under this License.
|
||||||
|
However, parties who have received copies, or rights, from you under
|
||||||
|
this License will not have their licenses terminated so long as such
|
||||||
|
parties remain in full compliance.
|
||||||
|
|
||||||
|
5. You are not required to accept this License, since you have not
|
||||||
|
signed it. However, nothing else grants you permission to modify or
|
||||||
|
distribute the Program or its derivative works. These actions are
|
||||||
|
prohibited by law if you do not accept this License. Therefore, by
|
||||||
|
modifying or distributing the Program (or any work based on the
|
||||||
|
Program), you indicate your acceptance of this License to do so, and
|
||||||
|
all its terms and conditions for copying, distributing or modifying
|
||||||
|
the Program or works based on it.
|
||||||
|
|
||||||
|
6. Each time you redistribute the Program (or any work based on the
|
||||||
|
Program), the recipient automatically receives a license from the
|
||||||
|
original licensor to copy, distribute or modify the Program subject to
|
||||||
|
these terms and conditions. You may not impose any further
|
||||||
|
restrictions on the recipients' exercise of the rights granted herein.
|
||||||
|
You are not responsible for enforcing compliance by third parties to
|
||||||
|
this License.
|
||||||
|
|
||||||
|
7. If, as a consequence of a court judgment or allegation of patent
|
||||||
|
infringement or for any other reason (not limited to patent issues),
|
||||||
|
conditions are imposed on you (whether by court order, agreement or
|
||||||
|
otherwise) that contradict the conditions of this License, they do not
|
||||||
|
excuse you from the conditions of this License. If you cannot
|
||||||
|
distribute so as to satisfy simultaneously your obligations under this
|
||||||
|
License and any other pertinent obligations, then as a consequence you
|
||||||
|
may not distribute the Program at all. For example, if a patent
|
||||||
|
license would not permit royalty-free redistribution of the Program by
|
||||||
|
all those who receive copies directly or indirectly through you, then
|
||||||
|
the only way you could satisfy both it and this License would be to
|
||||||
|
refrain entirely from distribution of the Program.
|
||||||
|
|
||||||
|
If any portion of this section is held invalid or unenforceable under
|
||||||
|
any particular circumstance, the balance of the section is intended to
|
||||||
|
apply and the section as a whole is intended to apply in other
|
||||||
|
circumstances.
|
||||||
|
|
||||||
|
It is not the purpose of this section to induce you to infringe any
|
||||||
|
patents or other property right claims or to contest validity of any
|
||||||
|
such claims; this section has the sole purpose of protecting the
|
||||||
|
integrity of the free software distribution system, which is
|
||||||
|
implemented by public license practices. Many people have made
|
||||||
|
generous contributions to the wide range of software distributed
|
||||||
|
through that system in reliance on consistent application of that
|
||||||
|
system; it is up to the author/donor to decide if he or she is willing
|
||||||
|
to distribute software through any other system and a licensee cannot
|
||||||
|
impose that choice.
|
||||||
|
|
||||||
|
This section is intended to make thoroughly clear what is believed to
|
||||||
|
be a consequence of the rest of this License.
|
||||||
|
|
||||||
|
8. If the distribution and/or use of the Program is restricted in
|
||||||
|
certain countries either by patents or by copyrighted interfaces, the
|
||||||
|
original copyright holder who places the Program under this License
|
||||||
|
may add an explicit geographical distribution limitation excluding
|
||||||
|
those countries, so that distribution is permitted only in or among
|
||||||
|
countries not thus excluded. In such case, this License incorporates
|
||||||
|
the limitation as if written in the body of this License.
|
||||||
|
|
||||||
|
9. The Free Software Foundation may publish revised and/or new versions
|
||||||
|
of the General Public License from time to time. Such new versions will
|
||||||
|
be similar in spirit to the present version, but may differ in detail to
|
||||||
|
address new problems or concerns.
|
||||||
|
|
||||||
|
Each version is given a distinguishing version number. If the Program
|
||||||
|
specifies a version number of this License which applies to it and "any
|
||||||
|
later version", you have the option of following the terms and conditions
|
||||||
|
either of that version or of any later version published by the Free
|
||||||
|
Software Foundation. If the Program does not specify a version number of
|
||||||
|
this License, you may choose any version ever published by the Free Software
|
||||||
|
Foundation.
|
||||||
|
|
||||||
|
10. If you wish to incorporate parts of the Program into other free
|
||||||
|
programs whose distribution conditions are different, write to the author
|
||||||
|
to ask for permission. For software which is copyrighted by the Free
|
||||||
|
Software Foundation, write to the Free Software Foundation; we sometimes
|
||||||
|
make exceptions for this. Our decision will be guided by the two goals
|
||||||
|
of preserving the free status of all derivatives of our free software and
|
||||||
|
of promoting the sharing and reuse of software generally.
|
||||||
|
|
||||||
|
NO WARRANTY
|
||||||
|
|
||||||
|
11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
|
||||||
|
FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN
|
||||||
|
OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
|
||||||
|
PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
|
||||||
|
OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
|
||||||
|
MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS
|
||||||
|
TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE
|
||||||
|
PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
|
||||||
|
REPAIR OR CORRECTION.
|
||||||
|
|
||||||
|
12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
|
||||||
|
WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
|
||||||
|
REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
|
||||||
|
INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
|
||||||
|
OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
|
||||||
|
TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
|
||||||
|
YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
|
||||||
|
PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
|
||||||
|
POSSIBILITY OF SUCH DAMAGES.
|
||||||
|
|
||||||
|
END OF TERMS AND CONDITIONS
|
||||||
|
|
||||||
|
How to Apply These Terms to Your New Programs
|
||||||
|
|
||||||
|
If you develop a new program, and you want it to be of the greatest
|
||||||
|
possible use to the public, the best way to achieve this is to make it
|
||||||
|
free software which everyone can redistribute and change under these terms.
|
||||||
|
|
||||||
|
To do so, attach the following notices to the program. It is safest
|
||||||
|
to attach them to the start of each source file to most effectively
|
||||||
|
convey the exclusion of warranty; and each file should have at least
|
||||||
|
the "copyright" line and a pointer to where the full notice is found.
|
||||||
|
|
||||||
|
<one line to give the program's name and a brief idea of what it does.>
|
||||||
|
Copyright (C) <year> <name of author>
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify
|
||||||
|
it under the terms of the GNU General Public License as published by
|
||||||
|
the Free Software Foundation; either version 2 of the License, or
|
||||||
|
(at your option) any later version.
|
||||||
|
|
||||||
|
This program is distributed in the hope that it will be useful,
|
||||||
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
|
GNU General Public License for more details.
|
||||||
|
|
||||||
|
You should have received a copy of the GNU General Public License along
|
||||||
|
with this program; if not, write to the Free Software Foundation, Inc.,
|
||||||
|
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
||||||
|
|
||||||
|
Also add information on how to contact you by electronic and paper mail.
|
||||||
|
|
||||||
|
If the program is interactive, make it output a short notice like this
|
||||||
|
when it starts in an interactive mode:
|
||||||
|
|
||||||
|
Gnomovision version 69, Copyright (C) year name of author
|
||||||
|
Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
|
||||||
|
This is free software, and you are welcome to redistribute it
|
||||||
|
under certain conditions; type `show c' for details.
|
||||||
|
|
||||||
|
The hypothetical commands `show w' and `show c' should show the appropriate
|
||||||
|
parts of the General Public License. Of course, the commands you use may
|
||||||
|
be called something other than `show w' and `show c'; they could even be
|
||||||
|
mouse-clicks or menu items--whatever suits your program.
|
||||||
|
|
||||||
|
You should also get your employer (if you work as a programmer) or your
|
||||||
|
school, if any, to sign a "copyright disclaimer" for the program, if
|
||||||
|
necessary. Here is a sample; alter the names:
|
||||||
|
|
||||||
|
Yoyodyne, Inc., hereby disclaims all copyright interest in the program
|
||||||
|
`Gnomovision' (which makes passes at compilers) written by James Hacker.
|
||||||
|
|
||||||
|
<signature of Ty Coon>, 1 April 1989
|
||||||
|
Ty Coon, President of Vice
|
||||||
|
|
||||||
|
This General Public License does not permit incorporating your program into
|
||||||
|
proprietary programs. If your program is a subroutine library, you may
|
||||||
|
consider it more useful to permit linking proprietary applications with the
|
||||||
|
library. If this is what you want to do, use the GNU Lesser General
|
||||||
|
Public License instead of this License.
|
||||||
|
|
@ -0,0 +1,45 @@
|
||||||
|
git2cl
|
||||||
|
======
|
||||||
|
|
||||||
|
This is a quick'n'dirty tool to convert git logs to GNU ChangeLog
|
||||||
|
format.
|
||||||
|
|
||||||
|
The tool invokes 'git log' internally unless you pipe a log to it.
|
||||||
|
Thus, typically you would use it as follows:
|
||||||
|
|
||||||
|
...........................................................................
|
||||||
|
jas@mocca:~/src/libtasn1$ git2cl > ChangeLog
|
||||||
|
jas@mocca:~/src/libtasn1$
|
||||||
|
...........................................................................
|
||||||
|
|
||||||
|
If you don't want git2cl to invoke git log internally, you can use it
|
||||||
|
as a pipe. It needs a git log generated with --pretty --numstat and
|
||||||
|
--summary. You can use it as follows:
|
||||||
|
|
||||||
|
...........................................................................
|
||||||
|
jas@mocca:~/src/libtasn1$ git log --pretty --numstat --summary | ~/src/git2cl/git2cl > ChangeLog
|
||||||
|
jas@mocca:~/src/libtasn1$
|
||||||
|
...........................................................................
|
||||||
|
|
||||||
|
The output format is specified by:
|
||||||
|
|
||||||
|
link:http://www.gnu.org/prep/standards/html_node/Change-Logs.html[]
|
||||||
|
|
||||||
|
My inspiration for writing this tool was the
|
||||||
|
link:http://www.red-bean.com/cvs2cl/[cvs2cl] tool, which I have been
|
||||||
|
using in several projects. Replacing it was necessary to seriously
|
||||||
|
consider switching from CVS to GIT for my projects.
|
||||||
|
|
||||||
|
The canonical home page for git2cl is:
|
||||||
|
link:http://josefsson.org/git2cl/[] and its repository can be found at
|
||||||
|
link:http://repo.or.cz/w/git2cl.git[].
|
||||||
|
|
||||||
|
Credits
|
||||||
|
-------
|
||||||
|
|
||||||
|
Luis Mondesi contributed several improvements.
|
||||||
|
|
||||||
|
Support
|
||||||
|
-------
|
||||||
|
|
||||||
|
Try talking to mailto:simon@josefsson.org[Simon Josefsson].
|
||||||
|
|
@ -0,0 +1,392 @@
|
||||||
|
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN"
|
||||||
|
"http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
|
||||||
|
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en">
|
||||||
|
<head>
|
||||||
|
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
|
||||||
|
<meta name="generator" content="AsciiDoc 8.2.7" />
|
||||||
|
<style type="text/css">
|
||||||
|
/* Debug borders */
|
||||||
|
p, li, dt, dd, div, pre, h1, h2, h3, h4, h5, h6 {
|
||||||
|
/*
|
||||||
|
border: 1px solid red;
|
||||||
|
*/
|
||||||
|
}
|
||||||
|
|
||||||
|
body {
|
||||||
|
margin: 1em 5% 1em 5%;
|
||||||
|
}
|
||||||
|
|
||||||
|
a {
|
||||||
|
color: blue;
|
||||||
|
text-decoration: underline;
|
||||||
|
}
|
||||||
|
a:visited {
|
||||||
|
color: fuchsia;
|
||||||
|
}
|
||||||
|
|
||||||
|
em {
|
||||||
|
font-style: italic;
|
||||||
|
color: navy;
|
||||||
|
}
|
||||||
|
|
||||||
|
strong {
|
||||||
|
font-weight: bold;
|
||||||
|
color: #083194;
|
||||||
|
}
|
||||||
|
|
||||||
|
tt {
|
||||||
|
color: navy;
|
||||||
|
}
|
||||||
|
|
||||||
|
h1, h2, h3, h4, h5, h6 {
|
||||||
|
color: #527bbd;
|
||||||
|
font-family: sans-serif;
|
||||||
|
margin-top: 1.2em;
|
||||||
|
margin-bottom: 0.5em;
|
||||||
|
line-height: 1.3;
|
||||||
|
}
|
||||||
|
|
||||||
|
h1, h2, h3 {
|
||||||
|
border-bottom: 2px solid silver;
|
||||||
|
}
|
||||||
|
h2 {
|
||||||
|
padding-top: 0.5em;
|
||||||
|
}
|
||||||
|
h3 {
|
||||||
|
float: left;
|
||||||
|
}
|
||||||
|
h3 + * {
|
||||||
|
clear: left;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.sectionbody {
|
||||||
|
font-family: serif;
|
||||||
|
margin-left: 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
hr {
|
||||||
|
border: 1px solid silver;
|
||||||
|
}
|
||||||
|
|
||||||
|
p {
|
||||||
|
margin-top: 0.5em;
|
||||||
|
margin-bottom: 0.5em;
|
||||||
|
}
|
||||||
|
|
||||||
|
ul, ol, li > p {
|
||||||
|
margin-top: 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
pre {
|
||||||
|
padding: 0;
|
||||||
|
margin: 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
span#author {
|
||||||
|
color: #527bbd;
|
||||||
|
font-family: sans-serif;
|
||||||
|
font-weight: bold;
|
||||||
|
font-size: 1.1em;
|
||||||
|
}
|
||||||
|
span#email {
|
||||||
|
}
|
||||||
|
span#revision {
|
||||||
|
font-family: sans-serif;
|
||||||
|
}
|
||||||
|
|
||||||
|
div#footer {
|
||||||
|
font-family: sans-serif;
|
||||||
|
font-size: small;
|
||||||
|
border-top: 2px solid silver;
|
||||||
|
padding-top: 0.5em;
|
||||||
|
margin-top: 4.0em;
|
||||||
|
}
|
||||||
|
div#footer-text {
|
||||||
|
float: left;
|
||||||
|
padding-bottom: 0.5em;
|
||||||
|
}
|
||||||
|
div#footer-badges {
|
||||||
|
float: right;
|
||||||
|
padding-bottom: 0.5em;
|
||||||
|
}
|
||||||
|
|
||||||
|
div#preamble,
|
||||||
|
div.tableblock, div.imageblock, div.exampleblock, div.verseblock,
|
||||||
|
div.quoteblock, div.literalblock, div.listingblock, div.sidebarblock,
|
||||||
|
div.admonitionblock {
|
||||||
|
margin-right: 10%;
|
||||||
|
margin-top: 1.5em;
|
||||||
|
margin-bottom: 1.5em;
|
||||||
|
}
|
||||||
|
div.admonitionblock {
|
||||||
|
margin-top: 2.5em;
|
||||||
|
margin-bottom: 2.5em;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.content { /* Block element content. */
|
||||||
|
padding: 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Block element titles. */
|
||||||
|
div.title, caption.title {
|
||||||
|
color: #527bbd;
|
||||||
|
font-family: sans-serif;
|
||||||
|
font-weight: bold;
|
||||||
|
text-align: left;
|
||||||
|
margin-top: 1.0em;
|
||||||
|
margin-bottom: 0.5em;
|
||||||
|
}
|
||||||
|
div.title + * {
|
||||||
|
margin-top: 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
td div.title:first-child {
|
||||||
|
margin-top: 0.0em;
|
||||||
|
}
|
||||||
|
div.content div.title:first-child {
|
||||||
|
margin-top: 0.0em;
|
||||||
|
}
|
||||||
|
div.content + div.title {
|
||||||
|
margin-top: 0.0em;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.sidebarblock > div.content {
|
||||||
|
background: #ffffee;
|
||||||
|
border: 1px solid silver;
|
||||||
|
padding: 0.5em;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.listingblock {
|
||||||
|
margin-right: 0%;
|
||||||
|
}
|
||||||
|
div.listingblock > div.content {
|
||||||
|
border: 1px solid silver;
|
||||||
|
background: #f4f4f4;
|
||||||
|
padding: 0.5em;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.quoteblock {
|
||||||
|
padding-left: 2.0em;
|
||||||
|
}
|
||||||
|
div.quoteblock > div.attribution {
|
||||||
|
padding-top: 0.5em;
|
||||||
|
text-align: right;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.verseblock {
|
||||||
|
padding-left: 2.0em;
|
||||||
|
}
|
||||||
|
div.verseblock > div.content {
|
||||||
|
white-space: pre;
|
||||||
|
}
|
||||||
|
div.verseblock > div.attribution {
|
||||||
|
padding-top: 0.75em;
|
||||||
|
text-align: left;
|
||||||
|
}
|
||||||
|
/* DEPRECATED: Pre version 8.2.7 verse style literal block. */
|
||||||
|
div.verseblock + div.attribution {
|
||||||
|
text-align: left;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.admonitionblock .icon {
|
||||||
|
vertical-align: top;
|
||||||
|
font-size: 1.1em;
|
||||||
|
font-weight: bold;
|
||||||
|
text-decoration: underline;
|
||||||
|
color: #527bbd;
|
||||||
|
padding-right: 0.5em;
|
||||||
|
}
|
||||||
|
div.admonitionblock td.content {
|
||||||
|
padding-left: 0.5em;
|
||||||
|
border-left: 2px solid silver;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.exampleblock > div.content {
|
||||||
|
border-left: 2px solid silver;
|
||||||
|
padding: 0.5em;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.imageblock div.content { padding-left: 0; }
|
||||||
|
div.imageblock img { border: 1px solid silver; }
|
||||||
|
span.image img { border-style: none; }
|
||||||
|
|
||||||
|
dl {
|
||||||
|
margin-top: 0.8em;
|
||||||
|
margin-bottom: 0.8em;
|
||||||
|
}
|
||||||
|
dt {
|
||||||
|
margin-top: 0.5em;
|
||||||
|
margin-bottom: 0;
|
||||||
|
font-style: normal;
|
||||||
|
}
|
||||||
|
dd > *:first-child {
|
||||||
|
margin-top: 0.1em;
|
||||||
|
}
|
||||||
|
|
||||||
|
ul, ol {
|
||||||
|
list-style-position: outside;
|
||||||
|
}
|
||||||
|
div.olist > ol {
|
||||||
|
list-style-type: decimal;
|
||||||
|
}
|
||||||
|
div.olist2 > ol {
|
||||||
|
list-style-type: lower-alpha;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.tableblock > table {
|
||||||
|
border: 3px solid #527bbd;
|
||||||
|
}
|
||||||
|
thead {
|
||||||
|
font-family: sans-serif;
|
||||||
|
font-weight: bold;
|
||||||
|
}
|
||||||
|
tfoot {
|
||||||
|
font-weight: bold;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.hlist {
|
||||||
|
margin-top: 0.8em;
|
||||||
|
margin-bottom: 0.8em;
|
||||||
|
}
|
||||||
|
div.hlist td {
|
||||||
|
padding-bottom: 15px;
|
||||||
|
}
|
||||||
|
td.hlist1 {
|
||||||
|
vertical-align: top;
|
||||||
|
font-style: normal;
|
||||||
|
padding-right: 0.8em;
|
||||||
|
}
|
||||||
|
td.hlist2 {
|
||||||
|
vertical-align: top;
|
||||||
|
}
|
||||||
|
|
||||||
|
@media print {
|
||||||
|
div#footer-badges { display: none; }
|
||||||
|
}
|
||||||
|
|
||||||
|
div#toctitle {
|
||||||
|
color: #527bbd;
|
||||||
|
font-family: sans-serif;
|
||||||
|
font-size: 1.1em;
|
||||||
|
font-weight: bold;
|
||||||
|
margin-top: 1.0em;
|
||||||
|
margin-bottom: 0.1em;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.toclevel1, div.toclevel2, div.toclevel3, div.toclevel4 {
|
||||||
|
margin-top: 0;
|
||||||
|
margin-bottom: 0;
|
||||||
|
}
|
||||||
|
div.toclevel2 {
|
||||||
|
margin-left: 2em;
|
||||||
|
font-size: 0.9em;
|
||||||
|
}
|
||||||
|
div.toclevel3 {
|
||||||
|
margin-left: 4em;
|
||||||
|
font-size: 0.9em;
|
||||||
|
}
|
||||||
|
div.toclevel4 {
|
||||||
|
margin-left: 6em;
|
||||||
|
font-size: 0.9em;
|
||||||
|
}
|
||||||
|
/* Workarounds for IE6's broken and incomplete CSS2. */
|
||||||
|
|
||||||
|
div.sidebar-content {
|
||||||
|
background: #ffffee;
|
||||||
|
border: 1px solid silver;
|
||||||
|
padding: 0.5em;
|
||||||
|
}
|
||||||
|
div.sidebar-title, div.image-title {
|
||||||
|
color: #527bbd;
|
||||||
|
font-family: sans-serif;
|
||||||
|
font-weight: bold;
|
||||||
|
margin-top: 0.0em;
|
||||||
|
margin-bottom: 0.5em;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.listingblock div.content {
|
||||||
|
border: 1px solid silver;
|
||||||
|
background: #f4f4f4;
|
||||||
|
padding: 0.5em;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.quoteblock-attribution {
|
||||||
|
padding-top: 0.5em;
|
||||||
|
text-align: right;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.verseblock-content {
|
||||||
|
white-space: pre;
|
||||||
|
}
|
||||||
|
div.verseblock-attribution {
|
||||||
|
padding-top: 0.75em;
|
||||||
|
text-align: left;
|
||||||
|
}
|
||||||
|
|
||||||
|
div.exampleblock-content {
|
||||||
|
border-left: 2px solid silver;
|
||||||
|
padding-left: 0.5em;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* IE6 sets dynamically generated links as visited. */
|
||||||
|
div#toc a:visited { color: blue; }
|
||||||
|
|
||||||
|
/* Because IE6 child selector is broken. */
|
||||||
|
div.olist2 ol {
|
||||||
|
list-style-type: lower-alpha;
|
||||||
|
}
|
||||||
|
div.olist2 div.olist ol {
|
||||||
|
list-style-type: decimal;
|
||||||
|
}
|
||||||
|
</style>
|
||||||
|
<title>git2cl</title>
|
||||||
|
</head>
|
||||||
|
<body>
|
||||||
|
<div id="header">
|
||||||
|
<h1>git2cl</h1>
|
||||||
|
</div>
|
||||||
|
<div id="preamble">
|
||||||
|
<div class="sectionbody">
|
||||||
|
<div class="para"><p>This is a quick'n'dirty tool to convert git logs to GNU ChangeLog
|
||||||
|
format.</p></div>
|
||||||
|
<div class="para"><p>The tool invokes <em>git log</em> internally unless you pipe a log to it.
|
||||||
|
Thus, typically you would use it as follows:</p></div>
|
||||||
|
<div class="literalblock">
|
||||||
|
<div class="content">
|
||||||
|
<pre><tt>jas@mocca:~/src/libtasn1$ git2cl > ChangeLog
|
||||||
|
jas@mocca:~/src/libtasn1$</tt></pre>
|
||||||
|
</div></div>
|
||||||
|
<div class="para"><p>If you don't want git2cl to invoke git log internally, you can use it
|
||||||
|
as a pipe. It needs a git log generated with —pretty —numstat and
|
||||||
|
—summary. You can use it as follows:</p></div>
|
||||||
|
<div class="literalblock">
|
||||||
|
<div class="content">
|
||||||
|
<pre><tt>jas@mocca:~/src/libtasn1$ git log --pretty --numstat --summary | ~/src/git2cl/git2cl > ChangeLog
|
||||||
|
jas@mocca:~/src/libtasn1$</tt></pre>
|
||||||
|
</div></div>
|
||||||
|
<div class="para"><p>The output format is specified by:</p></div>
|
||||||
|
<div class="para"><p><a href="http://www.gnu.org/prep/standards/html_node/Change-Logs.html">http://www.gnu.org/prep/standards/html_node/Change-Logs.html</a></p></div>
|
||||||
|
<div class="para"><p>My inspiration for writing this tool was the
|
||||||
|
<a href="http://www.red-bean.com/cvs2cl/">cvs2cl</a> tool, which I have been
|
||||||
|
using in several projects. Replacing it was necessary to seriously
|
||||||
|
consider switching from CVS to GIT for my projects.</p></div>
|
||||||
|
<div class="para"><p>The canonical home page for git2cl is:
|
||||||
|
<a href="http://josefsson.org/git2cl/">http://josefsson.org/git2cl/</a> and its repository can be found at
|
||||||
|
<a href="http://repo.or.cz/w/git2cl.git">http://repo.or.cz/w/git2cl.git</a>.</p></div>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
<h2 id="_credits">Credits</h2>
|
||||||
|
<div class="sectionbody">
|
||||||
|
<div class="para"><p>Luis Mondesi contributed several improvements.</p></div>
|
||||||
|
</div>
|
||||||
|
<h2 id="_support">Support</h2>
|
||||||
|
<div class="sectionbody">
|
||||||
|
<div class="para"><p>Try talking to <a href="mailto:simon@josefsson.org">Simon Josefsson</a>.</p></div>
|
||||||
|
</div>
|
||||||
|
<div id="footer">
|
||||||
|
<div id="footer-text">
|
||||||
|
Last updated 2008-08-27 12:42:17 CEST
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
</body>
|
||||||
|
</html>
|
||||||
|
|
@ -0,0 +1,372 @@
|
||||||
|
#!/usr/bin/perl
|
||||||
|
|
||||||
|
# Copyright (C) 2007, 2008 Simon Josefsson <simon@josefsson.org>
|
||||||
|
# Copyright (C) 2007 Luis Mondesi <lemsx1@gmail.com>
|
||||||
|
# * calls git directly. To use it just:
|
||||||
|
# cd ~/Project/my_git_repo; git2cl > ChangeLog
|
||||||
|
# * implements strptime()
|
||||||
|
# * fixes bugs in $comment parsing
|
||||||
|
# - copy input before we remove leading spaces
|
||||||
|
# - skip "merge branch" statements as they don't
|
||||||
|
# have information about files (i.e. we never
|
||||||
|
# go into $state 2)
|
||||||
|
# - behaves like a pipe/filter if input is given from the CLI
|
||||||
|
# else it calls git log by itself
|
||||||
|
#
|
||||||
|
# The functions mywrap, last_line_len, wrap_log_entry are derived from
|
||||||
|
# the cvs2cl tool, see <http://www.red-bean.com/cvs2cl/>:
|
||||||
|
# Copyright (C) 2001,2002,2003,2004 Martyn J. Pearce <fluffy@cpan.org>
|
||||||
|
# Copyright (C) 1999 Karl Fogel <kfogel@red-bean.com>
|
||||||
|
#
|
||||||
|
# git2cl is free software; you can redistribute it and/or modify it
|
||||||
|
# under the terms of the GNU General Public License as published by
|
||||||
|
# the Free Software Foundation; either version 2, or (at your option)
|
||||||
|
# any later version.
|
||||||
|
#
|
||||||
|
# git2cl is distributed in the hope that it will be useful, but
|
||||||
|
# WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||||
|
# General Public License for more details.
|
||||||
|
#
|
||||||
|
# You should have received a copy of the GNU General Public License
|
||||||
|
# along with git2cl; see the file COPYING. If not, write to the Free
|
||||||
|
# Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
|
||||||
|
# 02111-1307, USA.
|
||||||
|
|
||||||
|
use strict;
|
||||||
|
use POSIX qw(strftime);
|
||||||
|
use Text::Wrap qw(wrap);
|
||||||
|
use FileHandle;
|
||||||
|
|
||||||
|
use constant EMPTY_LOG_MESSAGE => '*** empty log message ***';
|
||||||
|
|
||||||
|
# this is a helper hash for stptime.
|
||||||
|
# Assumes you are calling 'git log ...' with LC_ALL=C
|
||||||
|
my %month = (
|
||||||
|
'Jan'=>0,
|
||||||
|
'Feb'=>1,
|
||||||
|
'Mar'=>2,
|
||||||
|
'Apr'=>3,
|
||||||
|
'May'=>4,
|
||||||
|
'Jun'=>5,
|
||||||
|
'Jul'=>6,
|
||||||
|
'Aug'=>7,
|
||||||
|
'Sep'=>8,
|
||||||
|
'Oct'=>9,
|
||||||
|
'Nov'=>10,
|
||||||
|
'Dec'=>11,
|
||||||
|
);
|
||||||
|
|
||||||
|
my $fh = new FileHandle;
|
||||||
|
|
||||||
|
sub key_ready
|
||||||
|
{
|
||||||
|
my ($rin, $nfd);
|
||||||
|
vec($rin, fileno(STDIN), 1) = 1;
|
||||||
|
return $nfd = select($rin, undef, undef, 0);
|
||||||
|
}
|
||||||
|
|
||||||
|
sub strptime {
|
||||||
|
my $str = shift;
|
||||||
|
return undef if not defined $str;
|
||||||
|
|
||||||
|
# we are parsing this format
|
||||||
|
# Fri Oct 26 00:42:56 2007 -0400
|
||||||
|
# to these fields
|
||||||
|
# sec, min, hour, mday, mon, year, wday = -1, yday = -1, isdst = -1
|
||||||
|
# Luis Mondesi <lemsx1@gmail.com>
|
||||||
|
my @date;
|
||||||
|
if ($str =~ /([[:alpha:]]{3})\s+([[:alpha:]]{3})\s+([[:digit:]]{1,2})\s+([[:digit:]]{1,2}):([[:digit:]]{1,2}):([[:digit:]]{1,2})\s+([[:digit:]]{4})/){
|
||||||
|
push(@date,$6,$5,$4,$3,$month{$2},($7 - 1900),-1,-1,-1);
|
||||||
|
} else {
|
||||||
|
die ("Cannot parse date '$str'\n'");
|
||||||
|
}
|
||||||
|
return @date;
|
||||||
|
}
|
||||||
|
|
||||||
|
sub mywrap {
|
||||||
|
my ($indent1, $indent2, @text) = @_;
|
||||||
|
# If incoming text looks preformatted, don't get clever
|
||||||
|
my $text = Text::Wrap::wrap($indent1, $indent2, @text);
|
||||||
|
if ( grep /^\s+/m, @text ) {
|
||||||
|
return $text;
|
||||||
|
}
|
||||||
|
my @lines = split /\n/, $text;
|
||||||
|
$indent2 =~ s!^((?: {8})+)!"\t" x (length($1)/8)!e;
|
||||||
|
$lines[0] =~ s/^$indent1\s+/$indent1/;
|
||||||
|
s/^$indent2\s+/$indent2/
|
||||||
|
for @lines[1..$#lines];
|
||||||
|
my $newtext = join "\n", @lines;
|
||||||
|
$newtext .= "\n"
|
||||||
|
if substr($text, -1) eq "\n";
|
||||||
|
return $newtext;
|
||||||
|
}
|
||||||
|
|
||||||
|
sub last_line_len {
|
||||||
|
my $files_list = shift;
|
||||||
|
my @lines = split (/\n/, $files_list);
|
||||||
|
my $last_line = pop (@lines);
|
||||||
|
return length ($last_line);
|
||||||
|
}
|
||||||
|
|
||||||
|
# A custom wrap function, sensitive to some common constructs used in
|
||||||
|
# log entries.
|
||||||
|
sub wrap_log_entry {
|
||||||
|
my $text = shift; # The text to wrap.
|
||||||
|
my $left_pad_str = shift; # String to pad with on the left.
|
||||||
|
|
||||||
|
# These do NOT take left_pad_str into account:
|
||||||
|
my $length_remaining = shift; # Amount left on current line.
|
||||||
|
my $max_line_length = shift; # Amount left for a blank line.
|
||||||
|
|
||||||
|
my $wrapped_text = ''; # The accumulating wrapped entry.
|
||||||
|
my $user_indent = ''; # Inherited user_indent from prev line.
|
||||||
|
|
||||||
|
my $first_time = 1; # First iteration of the loop?
|
||||||
|
my $suppress_line_start_match = 0; # Set to disable line start checks.
|
||||||
|
|
||||||
|
my @lines = split (/\n/, $text);
|
||||||
|
while (@lines) # Don't use `foreach' here, it won't work.
|
||||||
|
{
|
||||||
|
my $this_line = shift (@lines);
|
||||||
|
chomp $this_line;
|
||||||
|
|
||||||
|
if ($this_line =~ /^(\s+)/) {
|
||||||
|
$user_indent = $1;
|
||||||
|
}
|
||||||
|
else {
|
||||||
|
$user_indent = '';
|
||||||
|
}
|
||||||
|
|
||||||
|
# If it matches any of the line-start regexps, print a newline now...
|
||||||
|
if ($suppress_line_start_match)
|
||||||
|
{
|
||||||
|
$suppress_line_start_match = 0;
|
||||||
|
}
|
||||||
|
elsif (($this_line =~ /^(\s*)\*\s+[a-zA-Z0-9]/)
|
||||||
|
|| ($this_line =~ /^(\s*)\* [a-zA-Z0-9_\.\/\+-]+/)
|
||||||
|
|| ($this_line =~ /^(\s*)\([a-zA-Z0-9_\.\/\+-]+(\)|,\s*)/)
|
||||||
|
|| ($this_line =~ /^(\s+)(\S+)/)
|
||||||
|
|| ($this_line =~ /^(\s*)- +/)
|
||||||
|
|| ($this_line =~ /^()\s*$/)
|
||||||
|
|| ($this_line =~ /^(\s*)\*\) +/)
|
||||||
|
|| ($this_line =~ /^(\s*)[a-zA-Z0-9](\)|\.|\:) +/))
|
||||||
|
{
|
||||||
|
$length_remaining = $max_line_length - (length ($user_indent));
|
||||||
|
}
|
||||||
|
|
||||||
|
# Now that any user_indent has been preserved, strip off leading
|
||||||
|
# whitespace, so up-folding has no ugly side-effects.
|
||||||
|
$this_line =~ s/^\s*//;
|
||||||
|
|
||||||
|
# Accumulate the line, and adjust parameters for next line.
|
||||||
|
my $this_len = length ($this_line);
|
||||||
|
if ($this_len == 0)
|
||||||
|
{
|
||||||
|
# Blank lines should cancel any user_indent level.
|
||||||
|
$user_indent = '';
|
||||||
|
$length_remaining = $max_line_length;
|
||||||
|
}
|
||||||
|
elsif ($this_len >= $length_remaining) # Line too long, try breaking it.
|
||||||
|
{
|
||||||
|
# Walk backwards from the end. At first acceptable spot, break
|
||||||
|
# a new line.
|
||||||
|
my $idx = $length_remaining - 1;
|
||||||
|
if ($idx < 0) { $idx = 0 };
|
||||||
|
while ($idx > 0)
|
||||||
|
{
|
||||||
|
if (substr ($this_line, $idx, 1) =~ /\s/)
|
||||||
|
{
|
||||||
|
my $line_now = substr ($this_line, 0, $idx);
|
||||||
|
my $next_line = substr ($this_line, $idx);
|
||||||
|
$this_line = $line_now;
|
||||||
|
|
||||||
|
# Clean whitespace off the end.
|
||||||
|
chomp $this_line;
|
||||||
|
|
||||||
|
# The current line is ready to be printed.
|
||||||
|
$this_line .= "\n${left_pad_str}";
|
||||||
|
|
||||||
|
# Make sure the next line is allowed full room.
|
||||||
|
$length_remaining = $max_line_length - (length ($user_indent));
|
||||||
|
|
||||||
|
# Strip next_line, but then preserve any user_indent.
|
||||||
|
$next_line =~ s/^\s*//;
|
||||||
|
|
||||||
|
# Sneak a peek at the user_indent of the upcoming line, so
|
||||||
|
# $next_line (which will now precede it) can inherit that
|
||||||
|
# indent level. Otherwise, use whatever user_indent level
|
||||||
|
# we currently have, which might be none.
|
||||||
|
my $next_next_line = shift (@lines);
|
||||||
|
if ((defined ($next_next_line)) && ($next_next_line =~ /^(\s+)/)) {
|
||||||
|
$next_line = $1 . $next_line if (defined ($1));
|
||||||
|
# $length_remaining = $max_line_length - (length ($1));
|
||||||
|
$next_next_line =~ s/^\s*//;
|
||||||
|
}
|
||||||
|
else {
|
||||||
|
$next_line = $user_indent . $next_line;
|
||||||
|
}
|
||||||
|
if (defined ($next_next_line)) {
|
||||||
|
unshift (@lines, $next_next_line);
|
||||||
|
}
|
||||||
|
unshift (@lines, $next_line);
|
||||||
|
|
||||||
|
# Our new next line might, coincidentally, begin with one of
|
||||||
|
# the line-start regexps, so we temporarily turn off
|
||||||
|
# sensitivity to that until we're past the line.
|
||||||
|
$suppress_line_start_match = 1;
|
||||||
|
|
||||||
|
last;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
$idx--;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if ($idx == 0)
|
||||||
|
{
|
||||||
|
# We bottomed out because the line is longer than the
|
||||||
|
# available space. But that could be because the space is
|
||||||
|
# small, or because the line is longer than even the maximum
|
||||||
|
# possible space. Handle both cases below.
|
||||||
|
|
||||||
|
if ($length_remaining == ($max_line_length - (length ($user_indent))))
|
||||||
|
{
|
||||||
|
# The line is simply too long -- there is no hope of ever
|
||||||
|
# breaking it nicely, so just insert it verbatim, with
|
||||||
|
# appropriate padding.
|
||||||
|
$this_line = "\n${left_pad_str}${this_line}";
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
# Can't break it here, but may be able to on the next round...
|
||||||
|
unshift (@lines, $this_line);
|
||||||
|
$length_remaining = $max_line_length - (length ($user_indent));
|
||||||
|
$this_line = "\n${left_pad_str}";
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
else # $this_len < $length_remaining, so tack on what we can.
|
||||||
|
{
|
||||||
|
# Leave a note for the next iteration.
|
||||||
|
$length_remaining = $length_remaining - $this_len;
|
||||||
|
|
||||||
|
if ($this_line =~ /\.$/)
|
||||||
|
{
|
||||||
|
$this_line .= " ";
|
||||||
|
$length_remaining -= 2;
|
||||||
|
}
|
||||||
|
else # not a sentence end
|
||||||
|
{
|
||||||
|
$this_line .= " ";
|
||||||
|
$length_remaining -= 1;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
# Unconditionally indicate that loop has run at least once.
|
||||||
|
$first_time = 0;
|
||||||
|
|
||||||
|
$wrapped_text .= "${user_indent}${this_line}";
|
||||||
|
}
|
||||||
|
|
||||||
|
# One last bit of padding.
|
||||||
|
$wrapped_text .= "\n";
|
||||||
|
|
||||||
|
return $wrapped_text;
|
||||||
|
}
|
||||||
|
|
||||||
|
# main
|
||||||
|
|
||||||
|
my @date;
|
||||||
|
my $author;
|
||||||
|
my @files;
|
||||||
|
my $comment;
|
||||||
|
|
||||||
|
my $state; # 0-header 1-comment 2-files
|
||||||
|
my $done = 0;
|
||||||
|
|
||||||
|
$state = 0;
|
||||||
|
|
||||||
|
# if reading from STDIN, we assume that we are
|
||||||
|
# getting git log as input
|
||||||
|
if (key_ready())
|
||||||
|
{
|
||||||
|
|
||||||
|
#my $dummyfh; # don't care about writing
|
||||||
|
#($fh,$dummyfh) = FileHandle::pipe;
|
||||||
|
$fh->fdopen(*STDIN, 'r');
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
$fh->open("LC_ALL=C git log --pretty --numstat --summary|")
|
||||||
|
or die("Cannot execute git log...$!\n");
|
||||||
|
}
|
||||||
|
|
||||||
|
while (my $_l = <$fh>) {
|
||||||
|
#print STDERR "debug ($state, " . (@date ? (strftime "%Y-%m-%d", @date) : "") . "): `$_'\n";
|
||||||
|
if ($state == 0) {
|
||||||
|
if ($_l =~ m,^Author: (.*),) {
|
||||||
|
$author = $1;
|
||||||
|
}
|
||||||
|
if ($_l =~ m,^Date: (.*),) {
|
||||||
|
@date = strptime($1);
|
||||||
|
}
|
||||||
|
$state = 1 if ($_l =~ m,^$, and $author and (@date+0>0));
|
||||||
|
} elsif ($state == 1) {
|
||||||
|
# * modifying our input text is a bad choice
|
||||||
|
# let's make a copy of it first, then we remove spaces
|
||||||
|
# * if we meet a "merge branch" statement, we need to start
|
||||||
|
# over and find a real entry
|
||||||
|
# Luis Mondesi <lemsx1@gmail.com>
|
||||||
|
my $_s = $_l;
|
||||||
|
$_s =~ s/^ //g;
|
||||||
|
if ($_s =~ m/^Merge branch/)
|
||||||
|
{
|
||||||
|
$state=0;
|
||||||
|
next;
|
||||||
|
}
|
||||||
|
$comment = $comment . $_s;
|
||||||
|
$state = 2 if ($_l =~ m,^$,);
|
||||||
|
} elsif ($state == 2) {
|
||||||
|
if ($_l =~ m,^([0-9]+)\t([0-9]+)\t(.*)$,) {
|
||||||
|
push @files, $3;
|
||||||
|
}
|
||||||
|
$done = 1 if ($_l =~ m,^$,);
|
||||||
|
}
|
||||||
|
|
||||||
|
if ($done) {
|
||||||
|
print (strftime "%Y-%m-%d $author\n\n", @date);
|
||||||
|
|
||||||
|
my $files = join (", ", @files);
|
||||||
|
$files = mywrap ("\t", "\t", "* $files"), ": ";
|
||||||
|
|
||||||
|
if (index($comment, EMPTY_LOG_MESSAGE) > -1 ) {
|
||||||
|
$comment = "[no log message]\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
my $files_last_line_len = 0;
|
||||||
|
$files_last_line_len = last_line_len($files) + 1;
|
||||||
|
my $msg = wrap_log_entry($comment, "\t", 69-$files_last_line_len, 69);
|
||||||
|
|
||||||
|
$msg =~ s/[ \t]+\n/\n/g;
|
||||||
|
|
||||||
|
print "$files: $msg\n";
|
||||||
|
|
||||||
|
@date = ();
|
||||||
|
$author = "";
|
||||||
|
@files = ();
|
||||||
|
$comment = "";
|
||||||
|
|
||||||
|
$state = 0;
|
||||||
|
$done = 0;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if (@date + 0)
|
||||||
|
{
|
||||||
|
print (strftime "%Y-%m-%d $author\n\n", @date);
|
||||||
|
my $msg = wrap_log_entry($comment, "\t", 69, 69);
|
||||||
|
$msg =~ s/[ \t]+\n/\n/g;
|
||||||
|
print "\t* $msg\n";
|
||||||
|
}
|
||||||
Loading…
Reference in New Issue