paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-24 06:00:00 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fixed buffer overflow error in StringToPPChar(), detected using

Browse Source 
DIOTA (http://www.elis/rug.ac.be/~ronsse/diota) (which I also work on :)
    (merged)
This commit is contained in:
Jonas Maebe 2002-09-13 13:03:27 +00:00
parent b012e3336e
commit c5eb27f475
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rtl/unix/linux.pp
View File

@ -2271,7 +2271,7 @@ begin
while not (buf^ in [' ',#0,#8,#10]) do while not (buf^ in [' ',#0,#8,#10]) do
inc(buf); inc(buf);
end; end;
getmem(p,nr*4); getmem(p,nr*4+1);
StringToPPChar:=p; StringToPPChar:=p;
if p=nil then if p=nil then
begin begin
@ -3032,7 +3032,12 @@ End.
{ {
$Log$ $Log$
Revision 1.23 2002-09-07 16:01:27 peter Revision 1.24 2002-09-13 13:03:27 jonas
* fixed buffer overflow error in StringToPPChar(), detected using
DIOTA (http://www.elis/rug.ac.be/~ronsse/diota) (which I also work on :)
(merged)
Revision 1.23 2002/09/07 16:01:27 peter
* old logs removed and tabs fixed * old logs removed and tabs fixed
Revision 1.22 2002/08/06 13:30:46 sg Revision 1.22 2002/08/06 13:30:46 sg