Return to quota-glob.test CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / sqlite3 / test

Annotation of embedaddon/sqlite3/test/quota-glob.test, revision 1.1.1.1

1.1       misho       1: # 2011 December 1
                      2: #
                      3: # The author disclaims copyright to this source code.  In place of
                      4: # a legal notice, here is a blessing:
                      5: #
                      6: #    May you do good and not evil.
                      7: #    May you find forgiveness for yourself and forgive others.
                      8: #    May you share freely, never taking more than you give.
                      9: #
                     10: #***********************************************************************
                     11: #
                     12: # Tests for the glob-style string compare operator embedded in the
                     13: # quota shim.
                     14: #
                     15: 
                     16: set testdir [file dirname $argv0]
                     17: source $testdir/tester.tcl
                     18: 
                     19: catch { unset testnum }
                     20: catch { unset pattern }
                     21: catch { unset text }
                     22: catch { unset ans }
                     23: 
                     24: foreach {testnum pattern text ans} {
                     25:    1  abcdefg   abcdefg   1
                     26:    2  abcdefG   abcdefg   0
                     27:    3  abcdef    abcdefg   0
                     28:    4  abcdefgh  abcdefg   0
                     29:    5  abcdef?   abcdefg   1
                     30:    6  abcdef?   abcdef    0
                     31:    7  abcdef?   abcdefgh  0
                     32:    8  abcdefg   abcdef?   0
                     33:    9  abcdef?   abcdef?   1
                     34:   10  abc/def   abc/def   1
                     35:   11  abc//def  abc/def   0
                     36:   12  */abc/*   x/abc/y   1
                     37:   13  */abc/*   /abc/     1
                     38:   16  */abc/*   x///a/ab/abc   0
                     39:   17  */abc/*   x//a/ab/abc/   1
                     40:   16  */abc/*   x///a/ab/abc   0
                     41:   17  */abc/*   x//a/ab/abc/   1
                     42:   18  **/abc/** x//a/ab/abc/   1
                     43:   19  *?/abc/*? x//a/ab/abc/y  1
                     44:   20  ?*/abc/?* x//a/ab/abc/y  1
                     45:   21  {abc[cde]efg}   abcbefg  0
                     46:   22  {abc[cde]efg}   abccefg  1
                     47:   23  {abc[cde]efg}   abcdefg  1
                     48:   24  {abc[cde]efg}   abceefg  1
                     49:   25  {abc[cde]efg}   abcfefg  0
                     50:   26  {abc[^cde]efg}  abcbefg  1
                     51:   27  {abc[^cde]efg}  abccefg  0
                     52:   28  {abc[^cde]efg}  abcdefg  0
                     53:   29  {abc[^cde]efg}  abceefg  0
                     54:   30  {abc[^cde]efg}  abcfefg  1
                     55:   31  {abc[c-e]efg}   abcbefg  0
                     56:   32  {abc[c-e]efg}   abccefg  1
                     57:   33  {abc[c-e]efg}   abcdefg  1
                     58:   34  {abc[c-e]efg}   abceefg  1
                     59:   35  {abc[c-e]efg}   abcfefg  0
                     60:   36  {abc[^c-e]efg}  abcbefg  1
                     61:   37  {abc[^c-e]efg}  abccefg  0
                     62:   38  {abc[^c-e]efg}  abcdefg  0
                     63:   39  {abc[^c-e]efg}  abceefg  0
                     64:   40  {abc[^c-e]efg}  abcfefg  1
                     65:   41  {abc[c-e]efg}   abc-efg  0
                     66:   42  {abc[-ce]efg}   abc-efg  1
                     67:   43  {abc[ce-]efg}   abc-efg  1
                     68:   44  {abc[][*?]efg}  {abc]efg} 1
                     69:   45  {abc[][*?]efg}  {abc*efg} 1
                     70:   46  {abc[][*?]efg}  {abc?efg} 1
                     71:   47  {abc[][*?]efg}  {abc[efg} 1
                     72:   48  {abc[^][*?]efg} {abc]efg} 0
                     73:   49  {abc[^][*?]efg} {abc*efg} 0
                     74:   50  {abc[^][*?]efg} {abc?efg} 0
                     75:   51  {abc[^][*?]efg} {abc[efg} 0
                     76:   52  {abc[^][*?]efg} {abcdefg} 1
                     77:   53  {*[xyz]efg}     {abcxefg} 1
                     78:   54  {*[xyz]efg}     {abcwefg} 0
                     79: } {
                     80:   do_test quota-glob-$testnum.1 {
                     81:     sqlite3_quota_glob $::pattern $::text
                     82:   } $::ans
                     83:   do_test quota-glob-$testnum.2 {
                     84:     sqlite3_quota_glob $::pattern [string map {/ \\} $::text]
                     85:   } $::ans
                     86: }
                     87: finish_test