Changeset 850 for server/common


Ignore:
Timestamp:
Oct 8, 2008, 2:45:12 PM (15 years ago)
Author:
andersk
Message:
Check message length.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • server/common/oursrc/execsys/gitproxy.pl

    r849 r850  
    3434    $msg .= $buf;
    3535    my $len;
    36     if (($len) = $msg =~ m/^([[:xdigit:]]{4})/) {
     36    if (($len) = $msg =~ m/^([[:xdigit:]]{4})/ and length($') >= hex($len)) {
    3737        foreach (split("\0", $')) {
    3838            last if ($host) = m/^host=(.*)$/;
Note: See TracChangeset for help on using the changeset viewer.