diff --git a/test/long_stochastic.sh b/test/long_stochastic.sh
index 5d06bde7..900c1319 100755
--- a/test/long_stochastic.sh
+++ b/test/long_stochastic.sh
@@ -12,6 +12,7 @@ UNAME="$(uname -s 2>/dev/null || echo Unknown)"
 DB_UPTO_MB=17408
 PAGESIZE=min
 DONT_CHECK_RAM=no
+EXTRA=no
 
 while [ -n "$1" ]
 do
@@ -31,8 +32,9 @@ do
     echo "--dir PATH             Specifies directory for test DB and other files (it will be cleared)"
     echo "--db-upto-mb NN        Limits upper size of test DB to the NN megabytes"
     echo "--no-geometry-jitter   Disable jitter for geometry upper-size"
-    echo "--pagesize NN          Use specified page size (256 is minimal and used by default) "
-    echo "--dont-check-ram-size  Don't check available RAM "
+    echo "--pagesize NN          Use specified page size (256 is minimal and used by default)"
+    echo "--dont-check-ram-size  Don't check available RAM"
+    echo "--extra                Iterate extra modes/flags"
     echo "--help                 Print this usage help and exit"
     exit -2
   ;;
@@ -136,7 +138,7 @@ do
         PAGESIZE=$((1024*64))
       ;;
       *)
-        echo "Invalig page size '$2'"
+        echo "Invalid page size '$2'"
         exit -2
       ;;
     esac
@@ -145,6 +147,9 @@ do
   --dont-check-ram-size)
     DONT_CHECK_RAM=yes
   ;;
+  --extra)
+    EXTRA=yes
+  ;;
   *)
     echo "Unknown option '$1'"
     exit -2
@@ -350,9 +355,12 @@ else
   }
 fi
 
+if [ "$EXTRA" != "no" ]; then
+  options=(writemap lifo notls perturb nomeminit nordahead)
+else
+  options=(writemap lifo notls)
+fi
 syncmodes=("" ,+nosync-safe ,+nosync-utterly ,+nometasync)
-options=(writemap lifo notls perturb nomeminit nordahead)
-
 function join { local IFS="$1"; shift; echo "$*"; }
 
 function bits2options {
@@ -461,27 +469,29 @@ for nops in 10 33 100 333 1000 3333 10000 33333 100000 333333 1000000 3333333 10
         --nops=$nops --batch.write=$wbatch --mode=$(bits2options $bits)${syncmodes[count%4]} \
         --keygen.seed=${seed}
 
-      split=10
-      caption="Probe #$((++count)) int-key,w/o-dups, split=${split}, case $((++subcase)) of ${cases}" probe \
-        --pagesize=$PAGESIZE --size-upper-upto=${db_size_mb}M --table=+key.integer,-data.dups --keygen.split=${split} --keylen.min=min --keylen.max=max --datalen.min=min --datalen.max=1111 \
-        --nops=$nops --batch.write=$wbatch --mode=$(bits2options $bits)${syncmodes[count%4]} \
-        --keygen.seed=${seed}
-      caption="Probe #$((++count)) int-key,with-dups, split=${split}, case $((++subcase)) of ${cases}" probe \
-        --pagesize=$PAGESIZE --size-upper-upto=${db_size_mb}M --table=+key.integer,+data.dups --keygen.split=${split} --keylen.min=min --keylen.max=max --datalen.min=min --datalen.max=max \
-        --nops=$nops --batch.write=$wbatch --mode=$(bits2options $bits)${syncmodes[count%4]} \
-        --keygen.seed=${seed}
-      caption="Probe #$((++count)) int-key,int-data, split=${split}, case $((++subcase)) of ${cases}" probe \
-        --pagesize=$PAGESIZE --size-upper-upto=${db_size_mb}M --table=+key.integer,+data.integer --keygen.split=${split} --keylen.min=min --keylen.max=max --datalen.min=min --datalen.max=max \
-        --nops=$nops --batch.write=$wbatch --mode=$(bits2options $bits)${syncmodes[count%4]} \
-        --keygen.seed=${seed}
-      caption="Probe #$((++count)) w/o-dups, split=${split}, case $((++subcase)) of ${cases}" probe \
-        --pagesize=$PAGESIZE --size-upper-upto=${db_size_mb}M --table=-data.dups --keygen.split=${split} --keylen.min=min --keylen.max=max --datalen.min=min --datalen.max=1111 \
-        --nops=$nops --batch.write=$wbatch --mode=$(bits2options $bits)${syncmodes[count%4]} \
-        --keygen.seed=${seed}
-      caption="Probe #$((++count)) with-dups, split=${split}, case $((++subcase)) of ${cases}" probe \
-        --pagesize=$PAGESIZE --size-upper-upto=${db_size_mb}M --table=+data.dups --keygen.split=${split} --keylen.min=min --keylen.max=max --datalen.min=min --datalen.max=max \
-        --nops=$nops --batch.write=$wbatch --mode=$(bits2options $bits)${syncmodes[count%4]} \
-        --keygen.seed=${seed}
+      if [ "$EXTRA" != "no" ]; then
+        split=10
+        caption="Probe #$((++count)) int-key,w/o-dups, split=${split}, case $((++subcase)) of ${cases}" probe \
+          --pagesize=$PAGESIZE --size-upper-upto=${db_size_mb}M --table=+key.integer,-data.dups --keygen.split=${split} --keylen.min=min --keylen.max=max --datalen.min=min --datalen.max=1111 \
+          --nops=$nops --batch.write=$wbatch --mode=$(bits2options $bits)${syncmodes[count%4]} \
+          --keygen.seed=${seed}
+        caption="Probe #$((++count)) int-key,with-dups, split=${split}, case $((++subcase)) of ${cases}" probe \
+          --pagesize=$PAGESIZE --size-upper-upto=${db_size_mb}M --table=+key.integer,+data.dups --keygen.split=${split} --keylen.min=min --keylen.max=max --datalen.min=min --datalen.max=max \
+          --nops=$nops --batch.write=$wbatch --mode=$(bits2options $bits)${syncmodes[count%4]} \
+          --keygen.seed=${seed}
+        caption="Probe #$((++count)) int-key,int-data, split=${split}, case $((++subcase)) of ${cases}" probe \
+          --pagesize=$PAGESIZE --size-upper-upto=${db_size_mb}M --table=+key.integer,+data.integer --keygen.split=${split} --keylen.min=min --keylen.max=max --datalen.min=min --datalen.max=max \
+          --nops=$nops --batch.write=$wbatch --mode=$(bits2options $bits)${syncmodes[count%4]} \
+          --keygen.seed=${seed}
+        caption="Probe #$((++count)) w/o-dups, split=${split}, case $((++subcase)) of ${cases}" probe \
+          --pagesize=$PAGESIZE --size-upper-upto=${db_size_mb}M --table=-data.dups --keygen.split=${split} --keylen.min=min --keylen.max=max --datalen.min=min --datalen.max=1111 \
+          --nops=$nops --batch.write=$wbatch --mode=$(bits2options $bits)${syncmodes[count%4]} \
+          --keygen.seed=${seed}
+        caption="Probe #$((++count)) with-dups, split=${split}, case $((++subcase)) of ${cases}" probe \
+          --pagesize=$PAGESIZE --size-upper-upto=${db_size_mb}M --table=+data.dups --keygen.split=${split} --keylen.min=min --keylen.max=max --datalen.min=min --datalen.max=max \
+          --nops=$nops --batch.write=$wbatch --mode=$(bits2options $bits)${syncmodes[count%4]} \
+          --keygen.seed=${seed}
+      fi
 
       split=4
       caption="Probe #$((++count)) int-key,w/o-dups, split=${split}, case $((++subcase)) of ${cases}" probe \