#!/bin/sh # # check-utils - check that zzuf properly fuzzes common utilities # # Copyright © 2002—2015 Sam Hocevar # # This program is free software. It comes without any warranty, to # the extent permitted by applicable law. You can redistribute it # and/or modify it under the terms of the Do What the Fuck You Want # to Public License, Version 2, as published by the WTFPL Task Force. # See http://www.wtfpl.net/ for more details. # . "$(dirname "$0")/functions.inc" HAVE_GETLINE=$("$ZZAT" -l | grep >/dev/null 2>&1 '^ getline(' && echo "y") HAVE_GETDELIM=$("$ZZAT" -l | grep >/dev/null 2>&1 '^ getdelim(' && echo "y") HAVE_GETC_UNLOCKED=$("$ZZAT" -l | grep >/dev/null 2>&1 '^ getc_unlocked(' && echo "y") HAVE_FGETC_UNLOCKED=$("$ZZAT" -l | grep >/dev/null 2>&1 '^ fgetc_unlocked(' && echo "y") HAVE___FREAD_CHK=$("$ZZAT" -l | grep >/dev/null 2>&1 '^ __fread_chk(' && echo "y") checkutils() { r=$1 f=$2 file="$DIR/file-$f" # add -d on purpose here so we can detect bugs in debug() calls ZZOPTS="-d -s $seed -r $r" case $file in *text*) ZZOPTS="$ZZOPTS -P '\\n' -R '\\000'" ;; esac echo "*** file $file, ratio $r ***" REFMD5="" if [ $r = 0.0 -a $f = 00 ]; then check="bb7df04e1b0a2570657527a7e108ae23" echo "*** should be $check ***" check "$ZZOPTS" "< $file" "zzuf" "$check" else check "$ZZOPTS" "< $file" "zzuf" fi if [ "$STATIC_CAT" = "" ]; then check "$ZZOPTS" "cat $file" "cat" check "$ZZOPTS" "-i cat < $file" "|cat" fi if [ "$STATIC_DD" = "" ]; then check "$ZZOPTS" "dd bs=65536 if=$file" "dd(bs=65536)" check "$ZZOPTS" "dd bs=1111 if=$file" "dd(bs=1111)" check "$ZZOPTS" "dd bs=1024 if=$file" "dd(bs=1024)" check "$ZZOPTS" "dd bs=1 if=$file" "dd(bs=1)" fi case $file in *text*) # We don't include grep or sed when the input is not text, because # they put a newline at the end of their input if it was not there # initially. (Linux sed doesn't, but OS X sed does.) check "$ZZOPTS" "head -n 9999 $file" "head -n 9999" check "$ZZOPTS" "${TAILN}9999 $file" "${TAILN}9999" check "$ZZOPTS" "${TAILP}1 $file" "${TAILP}1" if grep -a '' /dev/null >/dev/null 2>&1; then check "$ZZOPTS" "grep -a '' $file" "grep -a ''" fi check "$ZZOPTS" "sed -e n $file" "sed -e n" #check "$ZZOPTS" "cut -b1- $file" "cut -b1-" check "$ZZOPTS" "-i head -n 9999 < $file" "|head -n 9999" check "$ZZOPTS" "-i ${TAILN}9999 < $file" "|${TAILN}9999" check "$ZZOPTS" "-i ${TAILP}1 < $file" "|${TAILP}1" if grep -a '' /dev/null >/dev/null 2>&1; then check "$ZZOPTS" "-i grep -a '' < $file" "|grep -a ''" fi check "$ZZOPTS" "-i sed -e n < $file" "|sed -e n" #check "$ZZOPTS" "-i cut -b1- < $file" "|cut -b1-" ;; esac # Regression tests for stuff that used to break check "$ZZOPTS" "$ZZAT -x \"fread(1,33000) fseek(1,SEEK_SET) fread(1,1) fseek(4093,SEEK_CUR) fread(1,1) fseek(1,SEEK_CUR) fread(1,1)\" $file" \ "eglibc (2.9-21) bug regression" if [ "$HAVE_GETC_UNLOCKED $HAVE_GETLINE" = "y y" ]; then check "$ZZOPTS" "$ZZAT -x \"repeat(33000,getc_unlocked(),feof(10),ungetc(),getline())\" $file" \ "sed getc_unlocked() bug regression" fi if [ "$HAVE___FREAD_CHK" = "y" ]; then check "$ZZOPTS" "$ZZAT -x \"repeat(-1,__fread_chk(1,1000),feof(1))\" $file" \ "Gentoo __fread_chk() bug regression" fi check "$ZZOPTS" "$ZZAT -x \"fread(1,4095) fread(1,1) fseek(0,SEEK_SET) fread(1,33000)\" $file" \ "streambuf end bug regression" check "$ZZOPTS" "$ZZAT -x \"fread(1,32768) fseek(-100,SEEK_END) fread(1,1) fseek(-1,SEEK_END) fread(1,1) fseek(-100,SEEK_CUR) fread(1,100)\" $file" \ "streambuf end bug regression" # Misc tests for n in \ "fread(1,33000)" \ "repeat(-1,fread(1,1000),feof(1))" \ "repeat(-1,fread(1,33),feof(1))" \ "getc() fread(1,33000)" \ "fgetc() fread(1,33000)" \ "getc() ungetc() fread(1,33000)" \ "fgetc() ungetc() fread(1,33000)" \ "repeat(-1,getc(),feof(10))" \ "repeat(-1,fgetc(),feof(10))" \ "repeat(8000,getc()) fread(1,33000)" \ "repeat(8000,fgetc()) fread(1,33000)" \ "fread(1,100) fseek(50,SEEK_SET) fread(1,33000)" \ "fread(1,100) rewind() fseek(50,SEEK_CUR) fread(1,33000)" \ "fread(1,33000) rewind() repeat(-1,fseek(1,SEEK_CUR),fread(1,1),feof(1))" \ "fread(1,33000) rewind() repeat(-1,fseek(2,SEEK_CUR),fread(1,2),feof(1))" \ "fread(1,33000) rewind() repeat(-1,fseek(3,SEEK_CUR),fread(1,3),feof(1))" \ "fread(1,33000) rewind() repeat(-1,fseek(4,SEEK_CUR),fread(1,4),feof(1))" \ "fread(1,33000) fseek(1000,SEEK_CUR) repeat(-1,fread(1,2),feof(10))" \ "fread(1,33000) fseek(1000,SEEK_CUR) repeat(-1,getc(),feof(10))" \ "fread(1,33000) fseek(1000,SEEK_CUR) repeat(-1,fgetc(),feof(10))" \ ; do check "$ZZOPTS" "$ZZAT -x \"$n\" $file" "$n" done # Platform-specific tests if [ "$HAVE_GETLINE" = "y" ]; then for n in \ "repeat(10,getline()) fread(1,33000)" \ "repeat(-1,getc(),feof(10),ungetc(),getline())" \ "repeat(-1,fgetc(),feof(10),ungetc(),getline())" \ ; do check "$ZZOPTS" "$ZZAT -x \"$n\" $file" "$n" done fi if [ "$HAVE_GETDELIM" = "y" ]; then for n in \ "repeat(10,getdelim(0)) fread(1,33000)" \ "repeat(10,getdelim(' ')) fread(1,33000)" \ ; do check "$ZZOPTS" "$ZZAT -x \"$n\" $file" "$n" done fi if [ "$HAVE_GETC_UNLOCKED" = "y" ]; then for n in \ "getc_unlocked() fread(1,33000)" \ "getc_unlocked() ungetc() fread(1,33000)" \ "repeat(-1,getc_unlocked(),feof(10))" \ "repeat(8000,getc_unlocked()) fread(1,33000)" \ "fread(1,33000) fseek(1000,SEEK_CUR) repeat(-1,getc_unlocked(),feof(10))" \ ; do check "$ZZOPTS" "$ZZAT -x \"$n\" $file" "$n" done fi if [ "$HAVE_FGETC_UNLOCKED" = "y" ]; then for n in \ "fgetc_unlocked() fread(1,33000)" \ "fgetc_unlocked() ungetc() fread(1,33000)" \ "repeat(-1,fgetc_unlocked(),feof(10))" \ "repeat(8000,fgetc_unlocked()) fread(1,33000)" \ ; do check "$ZZOPTS" "$ZZAT -x \"$n\" $file" "$n" done fi } check() { ZZOPTS="$1" CMD="$2" ALIAS="$3" CHECK="$4" printf " $(echo "$ALIAS .................................." | cut -b1-38) " MD5="$(eval "$ZZUF -m $ZZOPTS $CMD" 2>/dev/null | cut -f2 -d' ')" if [ -n "$CHECK" ]; then REFMD5="$CHECK" fi if [ -z "$REFMD5" ]; then REFMD5="$MD5" echo "$MD5" elif [ "$MD5" != "$REFMD5" ]; then fail_test "$MD5 FAILED" else pass_test 'ok' fi } start_test "zzuf utils test suite" for r in 0.0 0.001 1.0; do for f in 00 ff text random; do checkutils $r $f done done stop_test