CAS implementation for Redis.

redis_cas.js

var LUA_GETS = 
  'return {'
+   'redis.call(\'get\', KEYS[1]),'
+   'redis.call(\'get\', KEYS[1]..\'_ver\')'
+ '}';

var LUA_CAS =
  'local ver = redis.call(\'get\', KEYS[1]..\'_ver\') '
+ 'if not ver or ver == KEYS[3] '
+   'then '
+     'redis.call(\'incr\', KEYS[1]..\'_ver\') '
+     'return redis.call(\'set\', KEYS[1], KEYS[2]) ' 
+   'else '
+     'return redis.error_reply(\'LATE\') '
+   'end';