[redis.git] / tests / unit / cas.tcl

start_server {tags {"cas"}} {
    test {EXEC works on WATCHed key not modified} {
        r watch x y z
        r watch k
        r multi
        r ping
        r exec
    } {PONG}

    test {EXEC fail on WATCHed key modified (1 key of 1 watched)} {
        r set x 30
        r watch x
        r set x 40
        r multi
        r ping
        r exec
    } {}

    test {EXEC fail on WATCHed key modified (1 key of 5 watched)} {
        r set x 30
        r watch a b x k z
        r set x 40
        r multi
        r ping
        r exec
    } {}

    test {EXEC fail on WATCHed key modified by SORT with STORE even if the result is empty} {
        r flushdb
        r lpush foo bar
        r watch foo
        r sort emptylist store foo
        r multi
        r ping
        r exec
    } {}

    test {After successful EXEC key is no longer watched} {
        r set x 30
        r watch x
        r multi
        r ping
        r exec
        r set x 40
        r multi
        r ping
        r exec
    } {PONG}

    test {After failed EXEC key is no longer watched} {
        r set x 30
        r watch x
        r set x 40
        r multi
        r ping
        r exec
        r set x 40
        r multi
        r ping
        r exec
    } {PONG}

    test {It is possible to UNWATCH} {
        r set x 30
        r watch x
        r set x 40
        r unwatch
        r multi
        r ping
        r exec
    } {PONG}

    test {UNWATCH when there is nothing watched works as expected} {
        r unwatch
    } {OK}

    test {FLUSHALL is able to touch the watched keys} {
        r set x 30
        r watch x
        r flushall
        r multi
        r ping
        r exec
    } {}

    test {FLUSHALL does not touch non affected keys} {
        r del x
        r watch x
        r flushall
        r multi
        r ping
        r exec
    } {PONG}

    test {FLUSHDB is able to touch the watched keys} {
        r set x 30
        r watch x
        r flushdb
        r multi
        r ping
        r exec
    } {}

    test {FLUSHDB does not touch non affected keys} {
        r del x
        r watch x
        r flushdb
        r multi
        r ping
        r exec
    } {PONG}

    test {WATCH is able to remember the DB a key belongs to} {
        r select 5
        r set x 30
        r watch x
        r select 1
        r set x 10
        r select 5
        r multi
        r ping
        r exec
    } {PONG}

    test {WATCH will consider touched keys target of EXPIRE} {
        r del x
        r set x foo
        r watch x
        r expire x 10
        r multi
        r ping
        r exec
    } {}

    test {WATCH will not consider touched expired keys} {
        r del x
        r set x foo
        r expire x 1
        r watch x
        after 1100
        r multi
        r ping
        r exec
    } {PONG}

    test {DISCARD should clear the WATCH dirty flag on the client} {
        r watch x
        r set x 10
        r multi
        r discard
        r multi
        r incr x
        r exec
    } {11}

    test {DISCARD should UNWATCH all the keys} {
        r watch x
        r set x 10
        r multi
        r discard
        r set x 10
        r multi
        r incr x
        r exec
    } {11}
}
Commit	Line	Data
7f7499ee	1	start_server {tags {"cas"}} {
c20c189d	2	test {EXEC works on WATCHed key not modified} {
	3	r watch x y z
	4	r watch k
	5	r multi
	6	r ping
	7	r exec
	8	} {PONG}
	9
	10	test {EXEC fail on WATCHed key modified (1 key of 1 watched)} {
	11	r set x 30
	12	r watch x
	13	r set x 40
	14	r multi
	15	r ping
	16	r exec
	17	} {}
	18
	19	test {EXEC fail on WATCHed key modified (1 key of 5 watched)} {
	20	r set x 30
	21	r watch a b x k z
	22	r set x 40
	23	r multi
	24	r ping
	25	r exec
	26	} {}
	27
a0bf8d0a MK	28	test {EXEC fail on WATCHed key modified by SORT with STORE even if the result is empty} {
	29	r flushdb
	30	r lpush foo bar
	31	r watch foo
	32	r sort emptylist store foo
	33	r multi
	34	r ping
	35	r exec
	36	} {}
	37
c20c189d	38	test {After successful EXEC key is no longer watched} {
	39	r set x 30
	40	r watch x
	41	r multi
	42	r ping
	43	r exec
	44	r set x 40
	45	r multi
	46	r ping
	47	r exec
	48	} {PONG}
	49
	50	test {After failed EXEC key is no longer watched} {
	51	r set x 30
	52	r watch x
	53	r set x 40
	54	r multi
	55	r ping
	56	r exec
	57	r set x 40
	58	r multi
	59	r ping
	60	r exec
	61	} {PONG}
	62
	63	test {It is possible to UNWATCH} {
	64	r set x 30
	65	r watch x
	66	r set x 40
	67	r unwatch
	68	r multi
	69	r ping
	70	r exec
	71	} {PONG}
	72
	73	test {UNWATCH when there is nothing watched works as expected} {
	74	r unwatch
	75	} {OK}
9b30e1a2	76
	77	test {FLUSHALL is able to touch the watched keys} {
	78	r set x 30
	79	r watch x
	80	r flushall
	81	r multi
	82	r ping
	83	r exec
	84	} {}
	85
	86	test {FLUSHALL does not touch non affected keys} {
	87	r del x
	88	r watch x
	89	r flushall
	90	r multi
	91	r ping
	92	r exec
	93	} {PONG}
	94
	95	test {FLUSHDB is able to touch the watched keys} {
	96	r set x 30
	97	r watch x
	98	r flushdb
	99	r multi
	100	r ping
	101	r exec
	102	} {}
	103
	104	test {FLUSHDB does not touch non affected keys} {
	105	r del x
	106	r watch x
	107	r flushdb
	108	r multi
	109	r ping
	110	r exec
	111	} {PONG}
	112
	113	test {WATCH is able to remember the DB a key belongs to} {
	114	r select 5
	115	r set x 30
	116	r watch x
	117	r select 1
	118	r set x 10
	119	r select 5
	120	r multi
	121	r ping
	122	r exec
	123	} {PONG}
b7a8daef	124
	125	test {WATCH will consider touched keys target of EXPIRE} {
	126	r del x
	127	r set x foo
	128	r watch x
	129	r expire x 10
	130	r multi
	131	r ping
	132	r exec
	133	} {}
	134
	135	test {WATCH will not consider touched expired keys} {
	136	r del x
	137	r set x foo
674df1ee	138	r expire x 1
b7a8daef	139	r watch x
674df1ee	140	after 1100
b7a8daef	141	r multi
	142	r ping
	143	r exec
	144	} {PONG}
674df1ee	145
	146	test {DISCARD should clear the WATCH dirty flag on the client} {
	147	r watch x
	148	r set x 10
	149	r multi
	150	r discard
	151	r multi
	152	r incr x
	153	r exec
	154	} {11}
	155
	156	test {DISCARD should UNWATCH all the keys} {
	157	r watch x
	158	r set x 10
	159	r multi
	160	r discard
	161	r set x 10
	162	r multi
	163	r incr x
	164	r exec
	165	} {11}
c20c189d	166	}