dbPvdLib.c File Reference

#include <stddef.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include "dbDefs.h"
#include "ellLib.h"
#include "epicsMutex.h"
#include "epicsStdio.h"
#include "epicsString.h"
#include "dbBase.h"
#include "dbStaticLib.h"
#include "dbStaticPvt.h"

Include dependency graph for dbPvdLib.c:

Go to the source code of this file.

Classes
struct	dbPvdBucket
struct	dbPvd

Macros
#define	epicsExportSharedSymbols
#define	MIN_SIZE   256
#define	DEFAULT_SIZE   512
#define	MAX_SIZE   65536

Typedefs
typedef struct dbPvd	dbPvd

Functions
int	dbPvdTableSize (int size)
void	dbPvdInitPvt (dbBase *pdbbase)
PVDENTRY *	dbPvdFind (dbBase *pdbbase, const char *name, size_t lenName)
PVDENTRY *	dbPvdAdd (dbBase *pdbbase, dbRecordType *precordType, dbRecordNode *precnode)
void	dbPvdDelete (dbBase *pdbbase, dbRecordNode *precnode)
void	dbPvdFreeMem (dbBase *pdbbase)
void	dbPvdDump (dbBase *pdbbase, int verbose)

Variables
unsigned int	dbPvdHashTableSize = 0

Macro Definition Documentation

#define DEFAULT_SIZE   512

Definition at line 42 of file dbPvdLib.c.

#define epicsExportSharedSymbols

Definition at line 23 of file dbPvdLib.c.

#define MAX_SIZE   65536

Definition at line 43 of file dbPvdLib.c.

#define MIN_SIZE   256

Definition at line 41 of file dbPvdLib.c.

Typedef Documentation

typedef struct dbPvd dbPvd

Function Documentation

PVDENTRY* dbPvdAdd	(	dbBase *	pdbbase,
		dbRecordType *	precordType,
		dbRecordNode *	precnode
	)

Definition at line 105 of file dbPvdLib.c.

{
    dbPvd *ppvd = pdbbase->ppvd;
    dbPvdBucket *pbucket;
    PVDENTRY *ppvdNode;
    char *name = precnode->recordname;
    unsigned int h;

    h = epicsStrHash(name, 0) & ppvd->mask;
    pbucket = ppvd->buckets[h];
    if (pbucket == NULL) {
        pbucket = dbCalloc(1, sizeof(dbPvdBucket));
        ellInit(&pbucket->list);
        pbucket->lock = epicsMutexCreate();
        ppvd->buckets[h] = pbucket;
    }

    epicsMutexMustLock(pbucket->lock);
    ppvdNode = (PVDENTRY *) ellFirst(&pbucket->list);
    while (ppvdNode) {
        if (strcmp(name, ppvdNode->precnode->recordname) == 0) {
            epicsMutexUnlock(pbucket->lock);
            return NULL;
        }
        ppvdNode = (PVDENTRY *) ellNext((ELLNODE *)ppvdNode);
    }
    ppvdNode = dbCalloc(1, sizeof(PVDENTRY));
    ppvdNode->precordType = precordType;
    ppvdNode->precnode = precnode;
    ellAdd(&pbucket->list, (ELLNODE *)ppvdNode);
    epicsMutexUnlock(pbucket->lock);
    return ppvdNode;
}

void dbPvdDelete	(	dbBase *	pdbbase,
		dbRecordNode *	precnode
	)

Definition at line 140 of file dbPvdLib.c.

{
    dbPvd *ppvd = pdbbase->ppvd;
    dbPvdBucket *pbucket;
    PVDENTRY *ppvdNode;
    char *name = precnode->recordname;

    pbucket = ppvd->buckets[epicsStrHash(name, 0) & ppvd->mask];
    if (pbucket == NULL) return;

    epicsMutexMustLock(pbucket->lock);
    ppvdNode = (PVDENTRY *) ellFirst(&pbucket->list);
    while (ppvdNode) {
        if (ppvdNode->precnode &&
            ppvdNode->precnode->recordname &&
            strcmp(name, ppvdNode->precnode->recordname) == 0) {
            ellDelete(&pbucket->list, (ELLNODE *)ppvdNode);
            free(ppvdNode);
            break;
        }
        ppvdNode = (PVDENTRY *) ellNext((ELLNODE *)ppvdNode);
    }
    epicsMutexUnlock(pbucket->lock);
    return;
}

void dbPvdDump	(	dbBase *	pdbbase,
		int	verbose
	)

Definition at line 193 of file dbPvdLib.c.

{
    unsigned int empty = 0;
    dbPvd *ppvd;
    unsigned int h;

    if (!pdbbase) {
        fprintf(stderr,"pdbbase not specified\n");
        return;
    }
    ppvd = pdbbase->ppvd;
    if (ppvd == NULL) return;

    printf("Process Variable Directory has %u buckets", ppvd->size);

    for (h = 0; h < ppvd->size; h++) {
        dbPvdBucket *pbucket = ppvd->buckets[h];
        PVDENTRY *ppvdNode;
        int i = 1;

        if (pbucket == NULL) {
            empty++;
            continue;
        }
        epicsMutexMustLock(pbucket->lock);
        ppvdNode = (PVDENTRY *) ellFirst(&pbucket->list);
        printf("\n [%4u] %4d  ", h, ellCount(&pbucket->list));
        while (ppvdNode && verbose) {
            if (!(++i % 4))
                printf("\n         ");
            printf("  %s", ppvdNode->precnode->recordname);
            ppvdNode = (PVDENTRY *) ellNext((ELLNODE*)ppvdNode);
        }
        epicsMutexUnlock(pbucket->lock);
    }
    printf("\n%u buckets empty.\n", empty);
}

PVDENTRY* dbPvdFind	(	dbBase *	pdbbase,
		const char *	name,
		size_t	lenName
	)

Definition at line 82 of file dbPvdLib.c.

{
    dbPvd *ppvd = pdbbase->ppvd;
    dbPvdBucket *pbucket;
    PVDENTRY *ppvdNode;

    pbucket = ppvd->buckets[epicsMemHash(name, lenName, 0) & ppvd->mask];
    if (pbucket == NULL) return NULL;

    epicsMutexMustLock(pbucket->lock);
    ppvdNode = (PVDENTRY *) ellFirst(&pbucket->list);
    while (ppvdNode) {
        const char *recordname = ppvdNode->precnode->recordname;

        if (strncmp(name, recordname, lenName) == 0 &&
            strlen(recordname) == lenName)
            break;
        ppvdNode = (PVDENTRY *) ellNext((ELLNODE *)ppvdNode);
    }
    epicsMutexUnlock(pbucket->lock);
    return ppvdNode;
}

void dbPvdFreeMem

(

dbBase *

pdbbase

)

Definition at line 166 of file dbPvdLib.c.

{
    dbPvd *ppvd = pdbbase->ppvd;
    unsigned int h;

    if (ppvd == NULL) return;
    pdbbase->ppvd = NULL;

    for (h = 0; h < ppvd->size; h++) {
        dbPvdBucket *pbucket = ppvd->buckets[h];
        PVDENTRY *ppvdNode;

        if (pbucket == NULL) continue;
        epicsMutexMustLock(pbucket->lock);
        ppvd->buckets[h] = NULL;
        while ((ppvdNode = (PVDENTRY *) ellFirst(&pbucket->list))) {
            ellDelete(&pbucket->list, (ELLNODE *)ppvdNode);
            free(ppvdNode);
        }
        epicsMutexUnlock(pbucket->lock);
        epicsMutexDestroy(pbucket->lock);
        free(pbucket);
    }
    free(ppvd->buckets);
    free(ppvd);
}

void dbPvdInitPvt

(

dbBase *

pdbbase

)

Definition at line 63 of file dbPvdLib.c.

{
    dbPvd *ppvd;

    if (pdbbase->ppvd) return;

    if (dbPvdHashTableSize == 0) {
        dbPvdHashTableSize = DEFAULT_SIZE;
    }

    ppvd = (dbPvd *)dbMalloc(sizeof(dbPvd));
    ppvd->size    = dbPvdHashTableSize;
    ppvd->mask    = dbPvdHashTableSize - 1;
    ppvd->buckets = dbCalloc(ppvd->size, sizeof(dbPvdBucket *));

    pdbbase->ppvd = ppvd;
    return;
}

int dbPvdTableSize

(

int

size

)

Definition at line 46 of file dbPvdLib.c.

{
    if (size & (size - 1)) {
        printf("dbPvdTableSize: %d is not a power of 2\n", size);
        return -1;
    }

    if (size < MIN_SIZE)
        size = MIN_SIZE;

    if (size > MAX_SIZE)
        size = MAX_SIZE;

    dbPvdHashTableSize = size;
    return 0;
}

Variable Documentation

unsigned int dbPvdHashTableSize = 0

Definition at line 39 of file dbPvdLib.c.