add c-hashmap

Author: dsxack

c-hashmap/CMakeLists.txt

@@ -0,0 +1,6 @@
+cmake_minimum_required(VERSION 3.12)
+project(c_hashmap C)
+
+set(CMAKE_C_STANDARD 99)
+
+add_executable(c_hashmap main.c eprintf.c eprintf.h)

c-hashmap/eprintf.c

@@ -0,0 +1,54 @@
+#include "eprintf.h"
+
+/* eprintf: выводит сообщение об ошибке и выходит */
+void eprintf(char *fmt, ...) {
+    va_list args;
+
+    fflush(stdout);
+    if (getprogname() != NULL) {
+        fprintf(stderr, "%s: ", getprogname());
+    }
+
+    va_start(args, fmt);
+    vfprintf(stderr, fmt, args);
+    va_end(args);
+
+    if (fmt[0] != '\0' && fmt[strlen(fmt) - 1] == ':') {
+        fprintf(stderr, " %s", strerror(errno));
+    }
+
+    fprintf(stderr, "\n");
+    exit(2); /* условный код аварийного выхода */
+}
+
+/* emalloc: вызывает malloc, сообщает об ошибке */
+void *emalloc(size_t n) {
+    void *p;
+
+    p = malloc(n);
+    if (p == NULL) {
+        eprintf("malloc of %u bytes failed:", n);
+    }
+
+    return p;
+}
+
+/* weprintf: выводит сообщение об ошибке */
+void weprintf(char *fmt, ...) {
+    va_list args;
+
+    fflush(stdout);
+    if (getprogname() != NULL) {
+        fprintf(stderr, "%s: ", getprogname());
+    }
+
+    va_start(args, fmt);
+    vfprintf(stderr, fmt, args);
+    va_end(args);
+
+    if (fmt[0] != '\0' && fmt[strlen(fmt) - 1] == ':') {
+        fprintf(stderr, " %s", strerror(errno));
+    }
+
+    fprintf(stderr, "\n");
+}

c-hashmap/eprintf.h

@@ -0,0 +1,18 @@
+//
+// Created by Dmitriy Smotrov on 09/08/2018.
+//
+
+#ifndef C_BTREE_EPRINTF_H
+#define C_BTREE_EPRINTF_H
+
+#include <zconf.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <memory.h>
+#include <errno.h>
+
+void eprintf(char *fmt, ...);
+void *emalloc(size_t n);
+void weprintf(char *fmt, ...);
+
+#endif //C_BTREE_EPRINTF_H

c-hashmap/main.c

@@ -0,0 +1,64 @@
+#include <stdio.h>
+#include <memory.h>
+#include "eprintf.h"
+
+typedef struct Nameval Nameval;
+struct Nameval {
+    char *name;
+    int value;
+    Nameval *next; /* следующий в цепочке */
+};
+
+const int NHASH = 11;
+
+Nameval *symtab[NHASH]; /* таблица символов */
+
+enum {
+    MULTIPLIER = 31
+};
+
+unsigned int hash(char *str) {
+    unsigned int h;
+    unsigned char *p;
+
+    h = 0;
+    for (p = (unsigned char *) str; *p != '\0'; p++) {
+        h = MULTIPLIER * h + *p;
+    }
+
+    return h % NHASH;
+}
+
+Nameval *lookup(char *name, int create, int value) {
+    int h;
+    Nameval *sym;
+
+    h = hash(name);
+    for (sym = symtab[h]; sym != NULL; sym = sym->next) {
+        if (strcmp(name, sym->name) == 0) {
+            return sym;
+        }
+    }
+    if (create) {
+        sym = (Nameval *) emalloc(sizeof(Nameval));
+        sym->name = name; /* размещается в другом месте */
+        sym->value = value;
+        sym->next = symtab[h];
+        symtab[h] = sym;
+    }
+
+    return sym;
+}
+
+int main() {
+    lookup("AElig", 1, 0x00c);
+    lookup("zeta", 1, 0x03b6);
+    lookup("Acicrc", 1, 0x00c2);
+    lookup("AAcute", 1, 0x00c1);
+
+    Nameval *zeta = lookup("zeta", 0, 0);
+    printf("\nlookup: %s %x", zeta->name, zeta->value);
+
+    return 0;
+}
+