Add bounds checking to GrowPlist

gap-system · Dec 20, 2017 · 394727c · 394727c
1 parent 8b32bdc
commit 394727c
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/src/plist.c b/src/plist.c
@@ -67,6 +67,11 @@ Int GrowPlist (
  UInt plen; /* new physical length */
  UInt good; /* good new physical length */
 
+ if (!UINT_FITS_IN_INTOBJ(need)) {
+ ErrorMayQuit("GrowPlist: List size too large", 0, 0);
+ }
+
+
  /* find out how large the plain list should become */
  good = 5 * (SIZE_OBJ(list)/sizeof(Obj)-1) / 4 + 4;