Remove obsolete on disk dimm database code

Hasn't been used for a long time, using the in memory database
(memdb.c) instead.

3 files changed, 0 insertions, 462 deletions

diff --git a/dimm.c b/dimm.c
deleted file mode 100644
index 22ada68..0000000
--- a/dimm.c
+++ /dev/null
@@ -1,453 +0,0 @@
-/* Copyright (C) 2006 Andi Kleen, SuSE Labs.
-   Manage dimm database.
-   this is used to keep track of the error counts per DIMM
-   so that we can take action when one starts to experience a 
-   unusual large number of them.
-   Note: obsolete, not used anymore, new design is in memdb.c
-
-   mcelog is free software; you can redistribute it and/or
-   modify it under the terms of the GNU General Public
-   License as published by the Free Software Foundation; version
-   2.
-
-   mcelog is distributed in the hope that it will be useful,
-   but WITHOUT ANY WARRANTY; without even the implied warranty of
-   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-   General Public License for more details.
-
-   You should find a copy of v2 of the GNU General Public License somewhere
-   on your Linux system; if not, write to the Free Software Foundation, 
-   Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */
-
-/* TBD:
-   Put error trigger information into database? */
-
-#include <stddef.h>
-#include <stdlib.h>
-#include <string.h>
-#include <time.h>
-#include <unistd.h>
-#include <sys/wait.h>
-#include <errno.h>
-#include "dmi.h"
-#include "mcelog.h"
-#include "db.h"
-#include "dimm.h"
-
-/* the algorithms are mostly brute force, only the generally small number of 
-   dimms saves us.
-   advantage it is a quite simple and straight forward. */
-
-struct database *dimm_db;
-
-struct key {
-	char *name;
-	size_t offset;
-	enum { D_STR, D_BYTE, D_WORD, D_SIZE } type;
-	int cmp;
-};
-
-static unsigned key_sizes[] = {
-	[D_STR] = 1,
-	[D_BYTE] = 1,
-	[D_WORD] = 2,
-	[D_SIZE] = 2,
-};
-
-#define O(x) offsetof(struct dmi_memdev, x)
-
-static struct key keys[] = {
-	{ "Locator", O(device_locator), D_STR, 0 },
-	{ "Manufacturer", O(manufacturer), D_STR, 1},
-	{ "Serial Number", O(serial_number),D_STR, 1},
-	{ "Part Number", O(part_number), D_STR,10},
-	{ "Asset Tag", O(asset_tag), D_STR, 0},
-	{ "Speed", O(speed), D_WORD, 0},
-	{ "Size", O(speed), D_SIZE, 1},
-	{ "Form Factor", O(form_factor), D_STR, 0 },
-	{ "Type Details", O(type_details), D_WORD, 1 },
-	{ "Memory Type", O(memory_type), D_BYTE, 1 },
-	{ "Total Width", O(total_width), D_WORD, 0 },
-	{ "Data Width", O(data_width), D_WORD, 0 },
-	{ "Device Set", O(device_set), D_BYTE, 0 },
-	{ "Handle", O(header.handle), D_WORD, 0 },
-	{ "Bank Locator", O(bank_locator), D_STR, 0 },
-	{ "Array Handle", O(array_handle), D_WORD, 0 },
-	{ },
-};
-
-static void fmt_size(struct dmi_memdev *a, char *buf)
-{
-	char *unit;
-	unit = buf + sprintf(buf, "%u ", a->size);
-	dmi_dimm_size(a->size, unit);
-	*++unit = 0;	
-}
-
-static char *d_string(struct dmi_memdev *d, struct key *k, char *buf)
-{
-	unsigned char *p;
-	if (k->offset + key_sizes[k->type] > d->header.length)
-		return NULL;
-	p = (unsigned char *)d + k->offset;
-	switch (k->type) {
-	case D_BYTE:
-		sprintf(buf, "%u", *p);
-		break;
-	case D_WORD:
-		sprintf(buf, "%u", *(unsigned short *)p);
-		break;
-	case D_STR:
-		return dmi_getstring(&d->header, *p);
-	case D_SIZE:
-		fmt_size(d, buf);
-		break;
-	default:
-		abort();
-	}
-	return buf;
-}
-
-static int cmp_dimm(struct dmi_memdev *a, struct group *b)
-{
-	int i;
-	for (i = 0; keys[i].name; i++) {
-		char buf[100];
-		struct key *k = &keys[i];
-		if (!k->cmp)
-			continue;
-		char *s = d_string(a, k, buf);
-		if (!s)
-			continue;
-		char *s2 = entry_val(b, k->name);
-		if (!s2)
-			continue;
-		if (strcmp(s, s2))
-			return 0;
-	}
-	return 1;
-}
-
-static void d_to_group(struct dmi_memdev *de, struct group *g)
-{
-	char buf[100];
-	int i;
-	for (i = 0; keys[i].name; i++) {
-		struct key *k = &keys[i];
-		char *s = d_string(de, k, buf);
-		if (s)
-			change_entry(dimm_db, g, k->name, s);
-	}		
-}
-
-/* TBD get this into syslog somehow without spamming? */
-static void unique_warning(void)
-{
-	static int warned;
-	if (warned)
-		return;
-	warned = 1;
-	Wprintf("Cannot uniquely identify your memory modules\n");
-	Wprintf("When changing them you should manage them using command line mcelog\n");
-}
-
-static struct dmi_memdev *matching_dimm_group(struct group *g)
-{
-	int i;
-	struct dmi_memdev *match = NULL;
-	int nmatch = 0;
-	for (i = 0; dmi_dimms[i]; i++) {
-		if (cmp_dimm(dmi_dimms[i], g)) {
-			match = dmi_dimms[i];
-			nmatch++;
-		}
-	}
-	if (nmatch > 1) { 
-		unique_warning();
-		return NULL;
-	}
-	return match;
-}
-
-static struct group *matching_dimm_dmi(struct dmi_memdev *d)
-{
-	struct group *match = NULL, *g;
-	int nmatch = 0;
-	for (g = first_group(dimm_db); g; g = next_group(g)) {
-		if (!cmp_dimm(d, g)) { 
-			match = g;
-			nmatch++;
-		}
-	} 
-	if (nmatch > 1) { 
-		unique_warning();
-		return NULL;
-	}
-	return match;
-}
-
-void create_dimm_name(struct dmi_memdev *d, char *buf)
-{
-	int i = 1;
-	do {
-		sprintf(buf, "dimm%d", i++);
-	} while (find_group(dimm_db, buf));
-}
-
-static char *timestamp(void)
-{
-	static char buf[20];
-	time_t now;
-	time(&now);
-	sprintf(buf, "%lu", now);
-	return buf;
-}
-
-static void remove_dimm(struct group *g)
-{
-	char *loc = entry_val(g, "Locator");
-	Wprintf("Removing %s who was at %s\n", group_name(g), loc);
-	change_entry(dimm_db, g, "old locator", loc);
-	change_entry(dimm_db, g, "Locator", "removed");
-	change_entry(dimm_db, g, "removed at", timestamp());
-}
-
-static void disable_leftover_dimms(void)
-{
-	int i;
-	struct group *g;
-	/* Disable any left over dimms in the database.
-	   don't remove them because the information might
-	   be still useful later */
-	for (g = first_group(dimm_db); g; g = next_group(g)) {
-		char *gloc = entry_val(g, "Locator");
-		if (!gloc || !strcmp(gloc, "removed"))
-			continue;
-		for (i = 0; dmi_dimms[i]; i++) {
-			struct dmi_memdev *d = dmi_dimms[i];
-			char *loc = dmi_getstring(&d->header,
-						  d->device_locator);
-			if (!strcmp(loc, gloc))
-				break;
-		}
-		if (dmi_dimms[i] == NULL)
-			remove_dimm(g);
-	}
-}
-
-void move_dimm(struct group *g, struct dmi_memdev *newpos, char *loc)
-{
-	char *newloc = dmi_getstring(&newpos->header, newpos->device_locator);
-	Wprintf("%s seems to have moved from %s to %s\n",
-		group_name(g), loc, newloc);
-	change_entry(dimm_db, g, "old locator", loc);
-	change_entry(dimm_db, g, "Locator", newloc);
-	delete_entry(dimm_db, g, "removed at");
-	change_entry(dimm_db, g, "moved at", timestamp());
-}			
-
-void new_dimm(struct dmi_memdev *d, char *loc)
-{
-	struct group *g;
-	char name[100];
-	create_dimm_name(d, name);
-	g = add_group(dimm_db, name, NULL);
-	d_to_group(d, g);
-	change_entry(dimm_db, g, "added at", timestamp());
-	Wprintf("Found new %s at %s\n", name, loc);
-	/* Run uniqueness check */
-	(void)matching_dimm_group(g);
-}	
-
-/* check if reported dimms are at their places */
-void check_dimm_positions(void)
-{
-	int i;
-	struct group *g;
-	struct dmi_memdev *d;
-	struct dmi_memdev *match;
-
-	for (i = 0; (d = dmi_dimms[i]) != NULL; i++) {
-		char *loc = dmi_getstring(&d->header, d->device_locator);
-		g = find_entry(dimm_db, NULL, "Locator", loc);
-		/* In the database, but somewhere else? */
-		if (g && !cmp_dimm(d, g)) {
-			match = matching_dimm_group(g); 
-			if (match)
-				move_dimm(g, match, loc);
-			else
-				remove_dimm(g);
-			g = NULL;
-		/* In DMI but somewhere else? */
-		} else if (!g) { 
-			g = matching_dimm_dmi(d);
-			if (g) 
-				move_dimm(g, d, loc);
-		} 
-		if (!g)
-			new_dimm(d, loc);
-	}
-}
-
-/* synchronize database with smbios */
-int sync_dimms(void)
-{
-	if (!dmi_dimms)
-		return -1;
-	check_dimm_positions();
-	disable_leftover_dimms();	
-	sync_db(dimm_db);
-	return 0;	
-}
-
-void gc_dimms(void)
-{
-	struct group *g;
-	while ((g = find_entry(dimm_db, NULL, "Locator", "removed")) != NULL) {
-		Wprintf("Purging removed %s which was at %s\n",
-			group_name(g), entry_val(g, "Old Locator"));
-		delete_group(dimm_db, g);
-	}
-	sync_db(dimm_db);
-}
-
-static unsigned long inc_val(struct group *g, char *entry)
-{
-	unsigned long val = entry_num(g, entry) + 1;
-	change_entry_num(dimm_db, g, entry, val);
-	return val;
-}
-
-static void run_trigger(char *trigger, char *loc, unsigned long val,
-			unsigned long max)
-{
-	pid_t pid;
-
-	Lprintf("Running error trigger because memory at %s had %lu errors\n",
-		loc, max);
-	close_dimm_db();
-	if ((pid = fork()) == 0) {
-		char valbuf[20], maxbuf[20];
-		char *argv[] = {
-			trigger,
-			loc,
-			valbuf,
-			maxbuf,
-			NULL
-		};
-		char *env[] = {
-			"PATH=/sbin:/usr/bin",
-			NULL
-		};
-		sprintf(valbuf, "%lu", val);
-		sprintf(maxbuf, "%lu", max);
-		execve(trigger, argv, env);
-		_exit(1);
-	}
-	int status;
-	if (waitpid(pid, &status, 0) ||
-	    !WIFEXITED(status) ||
-	    WEXITSTATUS(status) != 0)
-		Eprintf("Cannot run error trigger %s for %s\n", trigger, loc);
-	open_dimm_db(NULL);
-}
-void new_error(unsigned long long addr, unsigned long max_error, char *trigger)
-{
-	struct dmi_memdev **devs;
-	int i;
-
-	devs = dmi_find_addr(addr);
-	if (devs[0] == NULL) {
-		Wprintf("No memory found for address %llx\n", addr);
-		exit(1);
-	}
-	for (i = 0; devs[i]; i++) {
-		struct dmi_memdev *d = devs[i];
-		char *loc = dmi_getstring(&d->header, d->device_locator);
-		struct group *g = find_entry(dimm_db, NULL, "Locator", loc);
-		if (!g) { // shouldn't happen
-			Eprintf("No record found for %llx\n", addr);
-			return;
-		}
-		unsigned long val = inc_val(g, "corrected errors");
-		if (val == max_error) { 
-			Lprintf("Large number of corrected errors in memory at %s", loc);
-			Lprintf("Consider replacing it");
-			if (trigger && trigger[0])
-				run_trigger(trigger, loc, val, max_error, false, "dimm");
-		}
-	}
-	free(devs);
-	devs = NULL;
-}
-
-void reset_dimm(char *locator)
-{
-	struct group *g;
-	if (locator) {
-		g = find_entry(dimm_db, NULL, "Locator", locator);
-		if (!g) {
-			fprintf(stderr, "Locator %s not found\n", locator);
-			exit(1);
-		}
-		change_entry(dimm_db, g, "corrected errors", "0");
-	} else {
-		for (g = first_group(dimm_db); g; g = next_group(g))
-			change_entry(dimm_db, g, "corrected errors", "0");
-	}
-	sync_db(dimm_db);
-}
-
-struct group *lookup_dimm(char *locator)
-{
-	struct group *g = find_entry(dimm_db, NULL, "Locator", locator);
-	return g;
-}
-
-void dump_all_dimms(void)
-{
-	dump_database(dimm_db, stdout);
-}
-
-void dump_dimm(char *locator)
-{
-	struct group *g = lookup_dimm(locator);
-	if (g)
-		dump_group(g, stdout);
-	else
-		fprintf(stderr, "%s not found\n", locator);
-}
-
-void close_dimm_db(void)
-{
-	if (dimm_db) {
-		close_db(dimm_db);
-		dimm_db = NULL;
-	}
-}
-
-int open_dimm_db(char *fn)
-{
-	static char *old_db_name;
-	if (dmi_dimms < 0)
-		return -1;
-	if (dimm_db)
-		return 0;
-	if (!fn) {
-		fn = old_db_name;
-	} else {
-		old_db_name = strdup(fn);
-		if (!old_db_name)
-			exit(ENOMEM);
-		atexit(close_dimm_db);
-	}
-	dimm_db = open_db(fn, 1);
-	if (!dimm_db) {
-		Eprintf("Cannot open dimm database %s: %s", fn,
-			strerror(errno));
-		return -1;
-	}
-	if (sync_dimms() < 0)
-		return -1;
-	return 0;
-}
diff --git a/dimm.h b/dimm.h
deleted file mode 100644
index de9fec0..0000000
--- a/dimm.h
+++ /dev/null
@@ -1,8 +0,0 @@
-void close_dimm_db(void);
-int open_dimm_db(char *fn);
-void new_error(unsigned long long addr, unsigned long max_error, char *trigger);
-void reset_dimm(char *locator);
-void gc_dimms(void);
-void dump_all_dimms(void);
-void dump_dimm(char *locator);
-
diff --git a/mcelog.c b/mcelog.c
index dc6e8a6..63b78bd 100644
--- a/mcelog.c
+++ b/mcelog.c
@@ -44,7 +44,6 @@
 #include "intel.h"
 #include "p4.h"
 #include "dmi.h"
-#include "dimm.h"
 #include "tsc.h"
 #include "version.h"
 #include "config.h"