db.c 23.1 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29
/*
 * Copyright (c) 2009-2012, Salvatore Sanfilippo <antirez at gmail dot com>
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *
 *   * Redistributions of source code must retain the above copyright notice,
 *     this list of conditions and the following disclaimer.
 *   * Redistributions in binary form must reproduce the above copyright
 *     notice, this list of conditions and the following disclaimer in the
 *     documentation and/or other materials provided with the distribution.
 *   * Neither the name of Redis nor the names of its contributors may be used
 *     to endorse or promote products derived from this software without
 *     specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

30 31 32
#include "redis.h"

#include <signal.h>
33
#include <ctype.h>
34

35 36 37
void SlotToKeyAdd(robj *key);
void SlotToKeyDel(robj *key);

38 39 40 41 42 43 44
/*-----------------------------------------------------------------------------
 * C-level DB API
 *----------------------------------------------------------------------------*/

robj *lookupKey(redisDb *db, robj *key) {
    dictEntry *de = dictFind(db->dict,key->ptr);
    if (de) {
45
        robj *val = dictGetVal(de);
46

G
guiquanz 已提交
47
        /* Update the access time for the ageing algorithm.
48 49
         * Don't do it if we have a saving child, as this will trigger
         * a copy on write madness. */
A
antirez 已提交
50
        if (server.rdb_child_pid == -1 && server.aof_child_pid == -1)
51
            val->lru = server.lruclock;
52 53 54 55 56 57 58
        return val;
    } else {
        return NULL;
    }
}

robj *lookupKeyRead(redisDb *db, robj *key) {
59 60
    robj *val;

61
    expireIfNeeded(db,key);
62 63 64 65 66 67
    val = lookupKey(db,key);
    if (val == NULL)
        server.stat_keyspace_misses++;
    else
        server.stat_keyspace_hits++;
    return val;
68 69 70
}

robj *lookupKeyWrite(redisDb *db, robj *key) {
71
    expireIfNeeded(db,key);
72 73 74 75 76 77 78 79 80 81 82 83 84 85 86
    return lookupKey(db,key);
}

robj *lookupKeyReadOrReply(redisClient *c, robj *key, robj *reply) {
    robj *o = lookupKeyRead(c->db, key);
    if (!o) addReply(c,reply);
    return o;
}

robj *lookupKeyWriteOrReply(redisClient *c, robj *key, robj *reply) {
    robj *o = lookupKeyWrite(c->db, key);
    if (!o) addReply(c,reply);
    return o;
}

87
/* Add the key to the DB. It's up to the caller to increment the reference
G
guiquanz 已提交
88
 * counter of the value if needed.
89 90 91 92 93 94
 *
 * The program is aborted if the key already exists. */
void dbAdd(redisDb *db, robj *key, robj *val) {
    sds copy = sdsdup(key->ptr);
    int retval = dictAdd(db->dict, copy, val);

95
    redisAssertWithInfo(NULL,key,retval == REDIS_OK);
96 97 98 99 100 101 102 103 104 105 106
    if (server.cluster_enabled) SlotToKeyAdd(key);
 }

/* Overwrite an existing key with a new value. Incrementing the reference
 * count of the new value is up to the caller.
 * This function does not modify the expire time of the existing key.
 *
 * The program is aborted if the key was not already present. */
void dbOverwrite(redisDb *db, robj *key, robj *val) {
    struct dictEntry *de = dictFind(db->dict,key->ptr);
    
107
    redisAssertWithInfo(NULL,key,de != NULL);
108
    dictReplace(db->dict, key->ptr, val);
109 110
}

111 112
/* High level Set operation. This function can be used in order to set
 * a key, whatever it was existing or not, to a new object.
113
 *
114 115 116 117 118 119
 * 1) The ref count of the value object is incremented.
 * 2) clients WATCHing for the destination key notified.
 * 3) The expire time of the key is reset (the key is made persistent). */
void setKey(redisDb *db, robj *key, robj *val) {
    if (lookupKeyWrite(db,key) == NULL) {
        dbAdd(db,key,val);
120
    } else {
121
        dbOverwrite(db,key,val);
122
    }
123 124
    incrRefCount(val);
    removeExpire(db,key);
125
    signalModifiedKey(db,key);
126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145
}

int dbExists(redisDb *db, robj *key) {
    return dictFind(db->dict,key->ptr) != NULL;
}

/* Return a random key, in form of a Redis object.
 * If there are no keys, NULL is returned.
 *
 * The function makes sure to return keys not already expired. */
robj *dbRandomKey(redisDb *db) {
    struct dictEntry *de;

    while(1) {
        sds key;
        robj *keyobj;

        de = dictGetRandomKey(db->dict);
        if (de == NULL) return NULL;

146
        key = dictGetKey(de);
147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162
        keyobj = createStringObject(key,sdslen(key));
        if (dictFind(db->expires,key)) {
            if (expireIfNeeded(db,keyobj)) {
                decrRefCount(keyobj);
                continue; /* search for another key. This expired. */
            }
        }
        return keyobj;
    }
}

/* Delete a key, value, and associated expiration entry if any, from the DB */
int dbDelete(redisDb *db, robj *key) {
    /* Deleting an entry from the expires dict will not free the sds of
     * the key, because it is shared with the main dictionary. */
    if (dictSize(db->expires) > 0) dictDelete(db->expires,key->ptr);
163 164 165 166 167 168
    if (dictDelete(db->dict,key->ptr) == DICT_OK) {
        if (server.cluster_enabled) SlotToKeyDel(key);
        return 1;
    } else {
        return 0;
    }
169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189
}

long long emptyDb() {
    int j;
    long long removed = 0;

    for (j = 0; j < server.dbnum; j++) {
        removed += dictSize(server.db[j].dict);
        dictEmpty(server.db[j].dict);
        dictEmpty(server.db[j].expires);
    }
    return removed;
}

int selectDb(redisClient *c, int id) {
    if (id < 0 || id >= server.dbnum)
        return REDIS_ERR;
    c->db = &server.db[id];
    return REDIS_OK;
}

190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206
/*-----------------------------------------------------------------------------
 * Hooks for key space changes.
 *
 * Every time a key in the database is modified the function
 * signalModifiedKey() is called.
 *
 * Every time a DB is flushed the function signalFlushDb() is called.
 *----------------------------------------------------------------------------*/

void signalModifiedKey(redisDb *db, robj *key) {
    touchWatchedKey(db,key);
}

void signalFlushedDb(int dbid) {
    touchWatchedKeysOnFlush(dbid);
}

207 208 209 210 211 212
/*-----------------------------------------------------------------------------
 * Type agnostic commands operating on the key space
 *----------------------------------------------------------------------------*/

void flushdbCommand(redisClient *c) {
    server.dirty += dictSize(c->db->dict);
213
    signalFlushedDb(c->db->id);
214 215 216 217 218 219
    dictEmpty(c->db->dict);
    dictEmpty(c->db->expires);
    addReply(c,shared.ok);
}

void flushallCommand(redisClient *c) {
220
    signalFlushedDb(-1);
221 222
    server.dirty += emptyDb();
    addReply(c,shared.ok);
A
antirez 已提交
223
    if (server.rdb_child_pid != -1) {
224
        kill(server.rdb_child_pid,SIGUSR1);
A
antirez 已提交
225
        rdbRemoveTempFile(server.rdb_child_pid);
226
    }
227 228 229 230
    if (server.saveparamslen > 0) {
        /* Normally rdbSave() will reset dirty, but we don't want this here
         * as otherwise FLUSHALL will not be replicated nor put into the AOF. */
        int saved_dirty = server.dirty;
A
antirez 已提交
231
        rdbSave(server.rdb_filename);
232 233
        server.dirty = saved_dirty;
    }
234 235 236 237 238 239 240 241
    server.dirty++;
}

void delCommand(redisClient *c) {
    int deleted = 0, j;

    for (j = 1; j < c->argc; j++) {
        if (dbDelete(c->db,c->argv[j])) {
242
            signalModifiedKey(c->db,c->argv[j]);
243 244
            notifyKeyspaceEvent(REDIS_NOTIFY_GENERIC,
                "del",c->argv[j],c->db->id);
245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261
            server.dirty++;
            deleted++;
        }
    }
    addReplyLongLong(c,deleted);
}

void existsCommand(redisClient *c) {
    expireIfNeeded(c->db,c->argv[1]);
    if (dbExists(c->db,c->argv[1])) {
        addReply(c, shared.cone);
    } else {
        addReply(c, shared.czero);
    }
}

void selectCommand(redisClient *c) {
262 263 264 265 266
    long id;

    if (getLongFromObjectOrReply(c, c->argv[1], &id,
        "invalid DB index") != REDIS_OK)
        return;
267

268
    if (server.cluster_enabled && id != 0) {
A
antirez 已提交
269 270 271
        addReplyError(c,"SELECT is not allowed in cluster mode");
        return;
    }
272
    if (selectDb(c,id) == REDIS_ERR) {
273
        addReplyError(c,"invalid DB index");
274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294
    } else {
        addReply(c,shared.ok);
    }
}

void randomkeyCommand(redisClient *c) {
    robj *key;

    if ((key = dbRandomKey(c->db)) == NULL) {
        addReply(c,shared.nullbulk);
        return;
    }

    addReplyBulk(c,key);
    decrRefCount(key);
}

void keysCommand(redisClient *c) {
    dictIterator *di;
    dictEntry *de;
    sds pattern = c->argv[1]->ptr;
A
antirez 已提交
295
    int plen = sdslen(pattern), allkeys;
296
    unsigned long numkeys = 0;
297
    void *replylen = addDeferredMultiBulkLength(c);
298

299
    di = dictGetSafeIterator(c->db->dict);
A
antirez 已提交
300
    allkeys = (pattern[0] == '*' && pattern[1] == '\0');
301
    while((de = dictNext(di)) != NULL) {
302
        sds key = dictGetKey(de);
303 304
        robj *keyobj;

A
antirez 已提交
305
        if (allkeys || stringmatchlen(pattern,plen,key,sdslen(key),0)) {
306 307 308 309 310 311 312 313 314
            keyobj = createStringObject(key,sdslen(key));
            if (expireIfNeeded(c->db,keyobj) == 0) {
                addReplyBulk(c,keyobj);
                numkeys++;
            }
            decrRefCount(keyobj);
        }
    }
    dictReleaseIterator(di);
315
    setDeferredMultiBulkLength(c,replylen,numkeys);
316 317 318
}

void dbsizeCommand(redisClient *c) {
319
    addReplyLongLong(c,dictSize(c->db->dict));
320 321 322
}

void lastsaveCommand(redisClient *c) {
323
    addReplyLongLong(c,server.lastsave);
324 325 326 327 328 329 330 331
}

void typeCommand(redisClient *c) {
    robj *o;
    char *type;

    o = lookupKeyRead(c->db,c->argv[1]);
    if (o == NULL) {
332
        type = "none";
333 334
    } else {
        switch(o->type) {
335 336 337 338 339 340
        case REDIS_STRING: type = "string"; break;
        case REDIS_LIST: type = "list"; break;
        case REDIS_SET: type = "set"; break;
        case REDIS_ZSET: type = "zset"; break;
        case REDIS_HASH: type = "hash"; break;
        default: type = "unknown"; break;
341 342
        }
    }
343
    addReplyStatus(c,type);
344 345 346
}

void shutdownCommand(redisClient *c) {
347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362
    int flags = 0;

    if (c->argc > 2) {
        addReply(c,shared.syntaxerr);
        return;
    } else if (c->argc == 2) {
        if (!strcasecmp(c->argv[1]->ptr,"nosave")) {
            flags |= REDIS_SHUTDOWN_NOSAVE;
        } else if (!strcasecmp(c->argv[1]->ptr,"save")) {
            flags |= REDIS_SHUTDOWN_SAVE;
        } else {
            addReply(c,shared.syntaxerr);
            return;
        }
    }
    if (prepareForShutdown(flags) == REDIS_OK) exit(0);
363
    addReplyError(c,"Errors trying to SHUTDOWN. Check logs.");
364 365 366 367
}

void renameGenericCommand(redisClient *c, int nx) {
    robj *o;
368
    long long expire;
369 370 371 372 373 374 375 376 377 378 379

    /* To use the same key as src and dst is probably an error */
    if (sdscmp(c->argv[1]->ptr,c->argv[2]->ptr) == 0) {
        addReply(c,shared.sameobjecterr);
        return;
    }

    if ((o = lookupKeyWriteOrReply(c,c->argv[1],shared.nokeyerr)) == NULL)
        return;

    incrRefCount(o);
380
    expire = getExpire(c->db,c->argv[1]);
381
    if (lookupKeyWrite(c->db,c->argv[2]) != NULL) {
382 383 384 385 386
        if (nx) {
            decrRefCount(o);
            addReply(c,shared.czero);
            return;
        }
A
antirez 已提交
387 388
        /* Overwrite: delete the old key before creating the new one
         * with the same name. */
389
        dbDelete(c->db,c->argv[2]);
390
    }
391 392
    dbAdd(c->db,c->argv[2],o);
    if (expire != -1) setExpire(c->db,c->argv[2],expire);
393
    dbDelete(c->db,c->argv[1]);
394 395
    signalModifiedKey(c->db,c->argv[1]);
    signalModifiedKey(c->db,c->argv[2]);
396 397 398 399
    notifyKeyspaceEvent(REDIS_NOTIFY_GENERIC,"rename_from",
        c->argv[1],c->db->id);
    notifyKeyspaceEvent(REDIS_NOTIFY_GENERIC,"rename_to",
        c->argv[2],c->db->id);
400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416
    server.dirty++;
    addReply(c,nx ? shared.cone : shared.ok);
}

void renameCommand(redisClient *c) {
    renameGenericCommand(c,0);
}

void renamenxCommand(redisClient *c) {
    renameGenericCommand(c,1);
}

void moveCommand(redisClient *c) {
    robj *o;
    redisDb *src, *dst;
    int srcid;

A
antirez 已提交
417 418 419 420 421
    if (server.cluster_enabled) {
        addReplyError(c,"MOVE is not allowed in cluster mode");
        return;
    }

422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445
    /* Obtain source and target DB pointers */
    src = c->db;
    srcid = c->db->id;
    if (selectDb(c,atoi(c->argv[2]->ptr)) == REDIS_ERR) {
        addReply(c,shared.outofrangeerr);
        return;
    }
    dst = c->db;
    selectDb(c,srcid); /* Back to the source DB */

    /* If the user is moving using as target the same
     * DB as the source DB it is probably an error. */
    if (src == dst) {
        addReply(c,shared.sameobjecterr);
        return;
    }

    /* Check if the element exists and get a reference */
    o = lookupKeyWrite(c->db,c->argv[1]);
    if (!o) {
        addReply(c,shared.czero);
        return;
    }

446 447
    /* Return zero if the key already exists in the target DB */
    if (lookupKeyWrite(dst,c->argv[1]) != NULL) {
448 449 450
        addReply(c,shared.czero);
        return;
    }
451
    dbAdd(dst,c->argv[1],o);
452 453 454 455 456 457 458 459 460 461 462 463 464 465 466
    incrRefCount(o);

    /* OK! key moved, free the entry in the source DB */
    dbDelete(src,c->argv[1]);
    server.dirty++;
    addReply(c,shared.cone);
}

/*-----------------------------------------------------------------------------
 * Expires API
 *----------------------------------------------------------------------------*/

int removeExpire(redisDb *db, robj *key) {
    /* An expire may only be removed if there is a corresponding entry in the
     * main dict. Otherwise, the key will never be freed. */
467
    redisAssertWithInfo(NULL,key,dictFind(db->dict,key->ptr) != NULL);
A
antirez 已提交
468
    return dictDelete(db->expires,key->ptr) == DICT_OK;
469 470
}

471 472
void setExpire(redisDb *db, robj *key, long long when) {
    dictEntry *kde, *de;
473 474

    /* Reuse the sds from the main dict in the expire dict */
475 476 477 478
    kde = dictFind(db->dict,key->ptr);
    redisAssertWithInfo(NULL,key,kde != NULL);
    de = dictReplaceRaw(db->expires,dictGetKey(kde));
    dictSetSignedIntegerVal(de,when);
479 480 481 482
}

/* Return the expire time of the specified key, or -1 if no expire
 * is associated with this key (i.e. the key is non volatile) */
483
long long getExpire(redisDb *db, robj *key) {
484 485 486 487 488 489 490 491
    dictEntry *de;

    /* No expire? return ASAP */
    if (dictSize(db->expires) == 0 ||
       (de = dictFind(db->expires,key->ptr)) == NULL) return -1;

    /* The entry was found in the expire dict, this means it should also
     * be present in the main dict (safety check). */
492
    redisAssertWithInfo(NULL,key,dictFind(db->dict,key->ptr) != NULL);
493
    return dictGetSignedIntegerVal(de);
494 495
}

496 497 498 499 500 501 502 503 504 505 506
/* Propagate expires into slaves and the AOF file.
 * When a key expires in the master, a DEL operation for this key is sent
 * to all the slaves and the AOF file if enabled.
 *
 * This way the key expiry is centralized in one place, and since both
 * AOF and the master->slave link guarantee operation ordering, everything
 * will be consistent even if we allow write operations against expiring
 * keys. */
void propagateExpire(redisDb *db, robj *key) {
    robj *argv[2];

507
    argv[0] = shared.del;
508
    argv[1] = key;
509 510
    incrRefCount(argv[0]);
    incrRefCount(argv[1]);
511

512
    if (server.aof_state != REDIS_AOF_OFF)
513
        feedAppendOnlyFile(server.delCommand,db->id,argv,2);
514 515 516
    if (listLength(server.slaves))
        replicationFeedSlaves(server.slaves,db->id,argv,2);

517 518
    decrRefCount(argv[0]);
    decrRefCount(argv[1]);
519 520
}

521
int expireIfNeeded(redisDb *db, robj *key) {
522
    long long when = getExpire(db,key);
523

524 525
    if (when < 0) return 0; /* No expire for this key */

526 527 528
    /* Don't expire anything while loading. It will be done later. */
    if (server.loading) return 0;

529 530 531 532 533 534 535 536
    /* If we are running in the context of a slave, return ASAP:
     * the slave key expiration is controlled by the master that will
     * send us synthesized DEL operations for expired keys.
     *
     * Still we try to return the right information to the caller, 
     * that is, 0 if we think the key should be still valid, 1 if
     * we think the key is expired at this time. */
    if (server.masterhost != NULL) {
537
        return mstime() > when;
538 539
    }

540
    /* Return when this key has not expired */
541
    if (mstime() <= when) return 0;
542 543 544

    /* Delete the key */
    server.stat_expiredkeys++;
545
    propagateExpire(db,key);
546 547
    notifyKeyspaceEvent(REDIS_NOTIFY_EXPIRED,
        "expired",key,db->id);
548 549 550 551 552 553 554
    return dbDelete(db,key);
}

/*-----------------------------------------------------------------------------
 * Expires Commands
 *----------------------------------------------------------------------------*/

555 556 557 558 559 560
/* This is the generic command implementation for EXPIRE, PEXPIRE, EXPIREAT
 * and PEXPIREAT. Because the commad second argument may be relative or absolute
 * the "basetime" argument is used to signal what the base time is (either 0
 * for *AT variants of the command, or the current time for relative expires).
 *
 * unit is either UNIT_SECONDS or UNIT_MILLISECONDS, and is only used for
G
guiquanz 已提交
561
 * the argv[2] parameter. The basetime is always specified in milliseconds. */
562
void expireGenericCommand(redisClient *c, long long basetime, int unit) {
563
    dictEntry *de;
564
    robj *key = c->argv[1], *param = c->argv[2];
565
    long long when; /* unix time in milliseconds when the key will expire. */
566

567
    if (getLongLongFromObjectOrReply(c, param, &when, NULL) != REDIS_OK)
568
        return;
569

570 571
    if (unit == UNIT_SECONDS) when *= 1000;
    when += basetime;
572 573 574 575 576 577

    de = dictFind(c->db->dict,key->ptr);
    if (de == NULL) {
        addReply(c,shared.czero);
        return;
    }
578 579 580 581 582 583
    /* EXPIRE with negative TTL, or EXPIREAT with a timestamp into the past
     * should never be executed as a DEL when load the AOF or in the context
     * of a slave instance.
     *
     * Instead we take the other branch of the IF statement setting an expire
     * (possibly in the past) and wait for an explicit DEL from the master. */
584
    if (when <= mstime() && !server.loading && !server.masterhost) {
585 586
        robj *aux;

587
        redisAssertWithInfo(c,key,dbDelete(c->db,key));
588 589 590 591 592 593
        server.dirty++;

        /* Replicate/AOF this as an explicit DEL. */
        aux = createStringObject("DEL",3);
        rewriteClientCommandVector(c,2,aux,key);
        decrRefCount(aux);
594
        signalModifiedKey(c->db,key);
595
        notifyKeyspaceEvent(REDIS_NOTIFY_GENERIC,"del",key,c->db->id);
596
        addReply(c, shared.cone);
597 598
        return;
    } else {
599
        setExpire(c->db,key,when);
600
        addReply(c,shared.cone);
601
        signalModifiedKey(c->db,key);
602
        notifyKeyspaceEvent(REDIS_NOTIFY_GENERIC,"expire",key,c->db->id);
603
        server.dirty++;
604 605 606 607 608
        return;
    }
}

void expireCommand(redisClient *c) {
609
    expireGenericCommand(c,mstime(),UNIT_SECONDS);
610 611 612
}

void expireatCommand(redisClient *c) {
613
    expireGenericCommand(c,0,UNIT_SECONDS);
614 615
}

616
void pexpireCommand(redisClient *c) {
617
    expireGenericCommand(c,mstime(),UNIT_MILLISECONDS);
618
}
619

620
void pexpireatCommand(redisClient *c) {
621
    expireGenericCommand(c,0,UNIT_MILLISECONDS);
622 623 624 625
}

void ttlGenericCommand(redisClient *c, int output_ms) {
    long long expire, ttl = -1;
626 627

    expire = getExpire(c->db,c->argv[1]);
628 629 630 631 632 633 634
    /* If the key does not exist at all, return -2 */
    if (expire == -1 && lookupKeyRead(c->db,c->argv[1]) == NULL) {
        addReplyLongLong(c,-2);
        return;
    }
    /* The key exists. Return -1 if it has no expire, or the actual
     * TTL value otherwise. */
635
    if (expire != -1) {
636
        ttl = expire-mstime();
637 638
        if (ttl < 0) ttl = -1;
    }
639 640 641
    if (ttl == -1) {
        addReplyLongLong(c,-1);
    } else {
642
        addReplyLongLong(c,output_ms ? ttl : ((ttl+500)/1000));
643
    }
644
}
A
antirez 已提交
645

646 647 648 649 650 651 652 653
void ttlCommand(redisClient *c) {
    ttlGenericCommand(c, 0);
}

void pttlCommand(redisClient *c) {
    ttlGenericCommand(c, 1);
}

A
antirez 已提交
654 655 656 657 658 659 660
void persistCommand(redisClient *c) {
    dictEntry *de;

    de = dictFind(c->db->dict,c->argv[1]->ptr);
    if (de == NULL) {
        addReply(c,shared.czero);
    } else {
A
antirez 已提交
661
        if (removeExpire(c->db,c->argv[1])) {
A
antirez 已提交
662
            addReply(c,shared.cone);
A
antirez 已提交
663 664
            server.dirty++;
        } else {
A
antirez 已提交
665
            addReply(c,shared.czero);
A
antirez 已提交
666
        }
A
antirez 已提交
667 668
    }
}
669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686

/* -----------------------------------------------------------------------------
 * API to get key arguments from commands
 * ---------------------------------------------------------------------------*/

int *getKeysUsingCommandTable(struct redisCommand *cmd,robj **argv, int argc, int *numkeys) {
    int j, i = 0, last, *keys;
    REDIS_NOTUSED(argv);

    if (cmd->firstkey == 0) {
        *numkeys = 0;
        return NULL;
    }
    last = cmd->lastkey;
    if (last < 0) last = argc+last;
    keys = zmalloc(sizeof(int)*((last - cmd->firstkey)+1));
    for (j = cmd->firstkey; j <= last; j += cmd->keystep) {
        redisAssert(j < argc);
687
        keys[i++] = j;
688
    }
689
    *numkeys = i;
690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718
    return keys;
}

int *getKeysFromCommand(struct redisCommand *cmd,robj **argv, int argc, int *numkeys, int flags) {
    if (cmd->getkeys_proc) {
        return cmd->getkeys_proc(cmd,argv,argc,numkeys,flags);
    } else {
        return getKeysUsingCommandTable(cmd,argv,argc,numkeys);
    }
}

void getKeysFreeResult(int *result) {
    zfree(result);
}

int *noPreloadGetKeys(struct redisCommand *cmd,robj **argv, int argc, int *numkeys, int flags) {
    if (flags & REDIS_GETKEYS_PRELOAD) {
        *numkeys = 0;
        return NULL;
    } else {
        return getKeysUsingCommandTable(cmd,argv,argc,numkeys);
    }
}

int *renameGetKeys(struct redisCommand *cmd,robj **argv, int argc, int *numkeys, int flags) {
    if (flags & REDIS_GETKEYS_PRELOAD) {
        int *keys = zmalloc(sizeof(int));
        *numkeys = 1;
        keys[0] = 1;
719
        return keys;
720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736
    } else {
        return getKeysUsingCommandTable(cmd,argv,argc,numkeys);
    }
}

int *zunionInterGetKeys(struct redisCommand *cmd,robj **argv, int argc, int *numkeys, int flags) {
    int i, num, *keys;
    REDIS_NOTUSED(cmd);
    REDIS_NOTUSED(flags);

    num = atoi(argv[2]->ptr);
    /* Sanity check. Don't return any key if the command is going to
     * reply with syntax error. */
    if (num > (argc-3)) {
        *numkeys = 0;
        return NULL;
    }
737
    keys = zmalloc(sizeof(int)*num);
738 739 740 741
    for (i = 0; i < num; i++) keys[i] = 3+i;
    *numkeys = num;
    return keys;
}
742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758

/* Slot to Key API. This is used by Redis Cluster in order to obtain in
 * a fast way a key that belongs to a specified hash slot. This is useful
 * while rehashing the cluster. */
void SlotToKeyAdd(robj *key) {
    unsigned int hashslot = keyHashSlot(key->ptr,sdslen(key->ptr));

    zslInsert(server.cluster.slots_to_keys,hashslot,key);
    incrRefCount(key);
}

void SlotToKeyDel(robj *key) {
    unsigned int hashslot = keyHashSlot(key->ptr,sdslen(key->ptr));

    zslDelete(server.cluster.slots_to_keys,hashslot,key);
}

A
antirez 已提交
759
unsigned int GetKeysInSlot(unsigned int hashslot, robj **keys, unsigned int count) {
760 761
    zskiplistNode *n;
    zrangespec range;
A
antirez 已提交
762
    int j = 0;
763 764 765 766 767

    range.min = range.max = hashslot;
    range.minex = range.maxex = 0;
    
    n = zslFirstInRange(server.cluster.slots_to_keys, range);
A
antirez 已提交
768 769 770 771 772
    while(n && n->score == hashslot && count--) {
        keys[j++] = n->obj;
        n = n->level[0].forward;
    }
    return j;
773
}