(* Tests for the IDSOnconfig module *)

module Test_IDSOnconfig =

  let general = "#          avoid disk corruption of another instance
###################################################################

ROOTNAME rootdbs
ROOTPATH $INFORMIXDIR/tmp/demo_on.rootdbs

DBSPACETEMP tempdb1:tempdb2
SBSPACETEMP tempsb1:tempsb2

DBSERVERNAME server
DBSERVERALIASES server1,server2,server3

#NETTYPE <protocol>,<# poll threads>,<number of connections/thread>,(NET|CPU)
NETTYPE ipcshm,1,50,CPU

#VPCLASS cpu,num=<#>[,max=<#>][,aff=<#>][,noage]
VPCLASS cpu,num=1,noage
#VPCLASS aio,num=<#>[,max=<#>][,aff=<#>][,noage]
VPCLASS aio,num=1
#SHMVIRT_ALLOCSEG <#|#.#>,<1-5>
SHMVIRT_ALLOCSEG 0,3

SHMNOACCESS 0x70000000-0x75000000,0x7A000000-0x80000000

#BTSCANNER num=<#>,threshold=<#>,rangesize=<#>,alice=(0-12),compression=[low|med|high|default]
BTSCANNER num=1,threshold=5000,rangesize=-1,alice=6,compression=default

#SQLTRACE level=(low|med|high),ntraces=<#>,size=<#>,mode=(global|user)
SQLTRACE level=low,ntraces=1000,size=2,mode=global

CDR_EVALTHREADS 1,2

#VPCLASS jvp,num=<#>[,max=<#>][,aff=<#>][,noage]
VPCLASS        jvp,num=1

JVPARGS        -verbose:jni;-Xms32m;-Xmx32m

BUFFERPOOL default,buffers=10000,lrus=8,lru_min_dirty=50.00,lru_max_dirty=60.50
BUFFERPOOL size=2k,buffers=50000,lrus=8,lru_min_dirty=50,lru_max_dirty=60
"

  test IDSOnconfig.lns get general =
    { "#comment" = "          avoid disk corruption of another instance" }
    { "#comment" = "##################################################################" }
    {}
    { "ROOTNAME" = "rootdbs" }
    { "ROOTPATH" = "$INFORMIXDIR/tmp/demo_on.rootdbs
    {}
    { "DBSPACETEMP"
        { "1" = "tempdb1" }
        { "2" = "tempdb2" }
    }
    { "SBSPACETEMP"
        { "1" = "tempsb1" }
        { "2" = "tempsb2" }
    }
    {}
    { "DBSERVERNAME" = "server" }
    { "DBSERVERALIASES"
        { "1" = "server1" }
        { "2" = "server2" }
        { "3" = "server3" }
    }
    {}
    { "#comment" = "NETTYPE <protocol>,<# poll threads>,<number of connections/thread>,(NET|CPU)" }
    { "NETTYPE"
        { "protocol" = "ipcshm" }
        { "pollthreads" = "1" }
        { "connections" = "50" }
        { "vpclass" = "CPU" }
    }
    {}
    { "#comment" = "VPCLASS cpu,num=<#>[,max=<#>][,aff=<#>][,noage]" }
    { "VPCLASS"
        { "class" = "cpu" }
        { "num" = "1" }
        { "noage" }
    }
    { "#comment" = "VPCLASS aio,num=<#>[,max=<#>][,aff=<#>][,noage]"
    { "VPCLASS"
        { "class" = "aio" }
        { "num" = "1" }
    }
    { "#comment" = "SHMVIRT_ALLOCSEG <#|#.#>,<1-5>" }
    { "SHMVIRT_ALLOCSEG"
        { "1" = "0" }
        { "2" = "3" }
    }
    {}
    { "SHMNOACCESS"
        { "1" = "0x70000000-0x75000000" }
        { "2" = "0x7A000000-0x80000000" }
    }
    {}
    { "#comment" = "BTSCANNER num=<#>,threshold=<#>,rangesize=<#>,alice=(0-12),compression=[low|med|high|default]
    { "BTSCANNER"
        { "num" = "1"" }
        { "threshold" = "5000" }
        { "rangesize" = "-1" }
        { "alice" = "6" }
        { "compression" = "default" }
    }
    {}
    { "#comment" = "SQLTRACE level=(low|med|high),ntraces=<#>,size=<#>,mode=(global|user)" }
    { "SQLTRACE"
        { "level" = "low" }
        { "ntraces" = "1000" }
        { "size" = "2" }
        { "mode" = "global" }
    }
    {}
    { "CDR_EVALTHREADS"
        { "1" = "1" }
        { "2" = "2" }
    }
    {}
    { "#comment" = "VPCLASS jvp,num=<#>[,max=<#>][,aff=<#>][,noage]" }
    { "VPCLASS"
        { "class" = "jvp" }
        { "num" = "1" }
    }
    {}
    { "JVPARGS"
        { "1" = "-verbose:jni" }
        { "2" = "-Xms32m" }
        { "3" = "-Xmx32m" }
    }
    {}
    { "BUFFERPOOL"
        { "size" = "default" }
        { "buffers" = "10000" }
        { "lrus" = "8" }
        { "lru_min_dirty" = "50.00" }
        { "lru_max_dirty" = "60.50" }
    }
    { "BUFFERPOOL"
        { "size" = "2k" }
        { "buffers" = "50000" }
        { "lrus" = "8" }
        { "lru_min_dirty" = "50" }
        { "lru_max_dirty" = "60" }
    }
"