CLRS 10.2-8

http://clrs.skanev.com/10/02/08.html
Explain how to implement doubly linked lists using only one pointer value np[x] per item instead of the usual two (next and prev). Assume that all pointer values can be interpreted as k-bit integers, and define np[x] to be np[x] = next[x] XOR prev[x], the k-bit "exclusive-or" of next[x] and prev[x]. (The value NIL is represented by 0.) Be sure to describe what information is needed to access the head of the list. Show how to implement the SEARCH, INSERT, and DELETE operations on such a list. Also show how to reverse such a list in O(1) time.

为了访问下一个元素，只需要XOR(np,prev).为了访问前一个元素，只需要XOR(np,next).
http://clrs.skanev.com/10/02/08.html
We can find the pointer to the next item by XOR-ing np with the pointer to the previous item and vice-versa. If the previous pointer of the head of the list is to NIL and the next pointer of the tail is to NIL, then we only need a pointer to either end of the list to access it. Reversing the list is just swapping the head and the tail.
http://www.cnblogs.com/buxianghe/archive/2013/03/22/2975663.html

typedef struct node_t {
    int key;
    struct node_t *np;
} node_t;

typedef struct {
    struct node_t *head;
    struct node_t *tail;
} list_t;

node_t *xor(node_t *left, node_t *right) {
    return (node_t *) (((unsigned long) left) ^ ((unsigned long) right));
}

void init_list(list_t *list) {
    list->head = NULL;
    list->tail = NULL;
}

void destroy_list(list_t *list) {
    node_t *prev = NULL;
    node_t *node = list->head;
    node_t *next;

    while (node) {
        next = xor(node->np, prev);
        free(node);
        prev = node;
        node = next;
    }
}

void insert(list_t *list, int key) {
    node_t *new = (node_t *) malloc(sizeof(node_t));
    new->key = key;
    new->np = xor(NULL, list->tail);

    if (list->tail) {
        list->tail->np = xor(new, xor(NULL, list->tail->np));
    }

    if (!list->head) {
        list->head = new;
    }

    list->tail = new;
}

int get(list_t *list, int index) {
    node_t *node = list->head;
    node_t *prev = NULL;
    node_t *next;

    while (index--) {
        if (!node) {
            fprintf(stderr, "Index out of bounds\n");
            exit(1);
        }
        next = xor(node->np, prev);
        prev = node;
        node = next;
    }

    return node->key;
}

node_t *search(list_t *list, int key) {
    node_t *node = list->head;
    node_t *prev = NULL;
    node_t *next;

    while (node) {
        if (node->key == key) {
            return node;
        }

        next = xor(node->np, prev);
        prev = node;
        node = next;
    }

    return NULL;
}

void delete(list_t *list, int key) {
    node_t *node = list->head;
    node_t *prev = NULL;
    node_t *next;

    while (node) {
        if (node->key == key) {
            next = xor(node->np, prev);

            if (prev) {
                prev->np = xor(xor(prev->np, node), next);
            } else {
                list->head = next;
            }

            if (next) {
                next->np = xor(xor(next->np, node), prev);
            } else {
                list->tail = prev;
            }

            node = next;
        } else {
            next = xor(node->np, prev);
            prev = node;
            node = next;
        }
    }
}

void reverse(list_t *list) {
    node_t *tmp;
    tmp = list->head;
    list->head = list->tail;
    list->tail = tmp;
}