[comp.lang.perl] TAINT and null args

jv@mh.nl (Johan Vromans) (04/15/91)

In str.c, routine str_scat may cause a coredump in taintperl if a
null argument is passed.

 | str_scat(dstr,sstr)
 | STR *dstr;
 | register STR *sstr;
 | {
 | #ifdef TAINT
 |     tainted |= sstr->str_tainted;	<<< crash if sstr == NULL
 | #endif
 |     if (!sstr)
 | 	return;

	Johan
-- 
Johan Vromans				       jv@mh.nl via internet backbones
Multihouse Automatisering bv		       uucp: ..!{uunet,hp4nl}!mh.nl!jv
Doesburgweg 7, 2803 PL Gouda, The Netherlands  phone/fax: +31 1820 62911/62500
------------------------ "Arms are made for hugging" -------------------------