Fuzzing with associated fixes

1 files changed, 2 insertions, 2 deletions

diff --git a/lib/bib-key.awk b/lib/bib-key.awk
index 4223155..3f4117f 100644
--- a/lib/bib-key.awk
+++ b/lib/bib-key.awk
@@ -38,7 +38,7 @@ function bib_mkkey(    a, y, t, surname, word, n, parts, i, w) {
     surname = (n > 0) ? parts[n] : ""
   }
   gsub(/[^A-Za-z0-9]/, "", surname)
-  surname = tolower(surname)
+  surname = tolower(substr(surname, 1, 30))
   if (surname == "")
     surname = "anon"
 
@@ -62,5 +62,5 @@ function bib_mkkey(    a, y, t, surname, word, n, parts, i, w) {
     break
   }
 
-  return surname y word
+  return surname y substr(word, 1, 30)
 }