Function intern_ptr

util/intern_strings.c:45–71

Store a copy of parameter str in a hash tbl */

/* Store a copy of parameter str in a hash tbl */
struct interned_string *intern_ptr(const char *str)
{
    struct interned_string *s;

    pthread_once(&once, init_interned_strings);
    Pthread_mutex_lock(&intern_lk);
    s = hash_find_readonly(interned_strings, &str);
    if (s == NULL) {
        s = malloc(sizeof(struct interned_string));
        if (s == NULL) {
            Pthread_mutex_unlock(&intern_lk);
            return NULL;
        }
        s->str = strdup(str);
        s->ix = node_ix++;
        s->ptr = NULL;
        s->clptr = NULL;
        if (s->str == NULL) {
            free(s);
            Pthread_mutex_unlock(&intern_lk);
            return NULL;
        }
        hash_add(interned_strings, s);
    }
    Pthread_mutex_unlock(&intern_lk);
    return s;
}

char *intern(const char *str)
{