--- Petr Baudis <pasky@xxxxxxx> wrote:
> Dear diary, on Fri, Oct 06, 2006 at 09:18:01PM CEST, I got a letter
> where Luben Tuikov <ltuikov@xxxxxxxxx> said that...
> > Convert a string (e.g. a filename) into qtext as defined
> > in RFC 822, from RFC 2183. To be used by Content-Disposition.
> >
> > Signed-off-by: Luben Tuikov <ltuikov@xxxxxxxxx>
> > ---
> > gitweb/gitweb.perl | 18 ++++++++++++++----
> > 1 files changed, 14 insertions(+), 4 deletions(-)
>
> Content-Description: 1207600725-p1.txt
> > diff --git a/gitweb/gitweb.perl b/gitweb/gitweb.perl
> > index f848648..a35d02c 100755
> > --- a/gitweb/gitweb.perl
> > +++ b/gitweb/gitweb.perl
> > @@ -520,6 +520,16 @@ sub esc_html {
> > return $str;
> > }
> >
> > +# Convert a string (e.g. a filename) into qtext as defined
> > +# in RFC 822, from RFC 2183. To be used by Content-Disposition.
> > +sub to_qtext {
> > + my $str = shift;
> > + $str =~ s/\\/\\\\/g;
> > + $str =~ s/\"/\\\"/g;
> > + $str =~ s/\r/\\r/g;
>
> \r? Not \n?
Yes, \r, not \n.
\n is LF, \r is CR, from ASCII(7).
LF is legal in qtext as defined in RFC 822.
The illegals in qtext are CR, backslash and double quote.
Luben
>
> > + return $str;
> > +}
> > +
> > # git may return quoted and escaped filenames
> > sub unquote {
> > my $str = shift;
>
> Other than that,
>
> Acked-by: Petr Baudis <pasky@xxxxxxx>
>
> --
> Petr "Pasky" Baudis
> Stuff: http://pasky.or.cz/
> #!/bin/perl -sp0777i<X+d*lMLa^*lN%0]dsXx++lMlN/dsM0<j]dsj
> $/=unpack('H*',$_);$_=`echo 16dio\U$k"SK$/SM$n\EsN0p[lN*1
> lK[d2%Sa2/d0$^Ixp"|dc`;s/\W//g;$_=pack('H*',/((..)*)$/)
>
-
To unsubscribe from this list: send the line "unsubscribe git" in
the body of a message to majordomo@xxxxxxxxxxxxxxx
More majordomo info at http://vger.kernel.org/majordomo-info.html