/alps/pcitool

To get this branch, use:
bzr branch http://suren.me/webbzr/alps/pcitool

« back to all changes in this revision

Viewing changes to pcilib/plugin.c

  • Committer: Suren A. Chilingaryan
  • Date: 2015-04-28 04:09:21 UTC
  • Revision ID: csa@suren.me-20150428040921-fjyahuk824lihv1i
Initial support for event engines

Show diffs side-by-side

added added

removed removed

Lines of Context:
pcilib/plugin.c
 
1
#include <stdio.h>
 
2
#include <stdlib.h>
 
3
#include <dlfcn.h>
 
4
#include <dirent.h>
 
5
#include <unistd.h>
 
6
#include <string.h>
 
7
#include <sys/types.h>
 
8
 
 
9
#include "model.h"
 
10
#include "pci.h"
 
11
#include "config.h"
 
12
 
 
13
void *pcilib_plugin_load(const char *name) {
 
14
    void *plug;
 
15
    char *fullname;
 
16
    const char *path;
 
17
 
 
18
    path = getenv("PCILIB_PLUGIN_DIR");
 
19
    if (!path) path = PCILIB_PLUGIN_DIR;
 
20
 
 
21
    fullname = malloc(strlen(path) + strlen(name) + 2);
 
22
    if (!fullname) return NULL;
 
23
 
 
24
    sprintf(fullname, "%s/%s", path, name);
 
25
 
 
26
    plug = dlopen(fullname, RTLD_LAZY|RTLD_LOCAL);
 
27
    free(fullname);
 
28
 
 
29
    return plug;
 
30
}
 
31
 
 
32
void pcilib_plugin_close(void *plug) {
 
33
    if (plug) 
 
34
        dlclose(plug);
 
35
 
 
36
}
 
37
 
 
38
void *pcilib_plugin_get_symbol(void *plug, const char *symbol) {
 
39
    if ((!plug)||(!symbol)) return NULL;
 
40
    return dlsym(plug, symbol);
 
41
}
 
42
 
 
43
const pcilib_model_description_t *pcilib_get_plugin_model(pcilib_t *pcilib, void *plug, unsigned short vendor_id, unsigned short device_id, const char *model) {
 
44
    void *get_model;
 
45
 
 
46
    if (!plug) return NULL;
 
47
 
 
48
    get_model = dlsym(plug, "pcilib_get_event_model");
 
49
    if (!get_model) return NULL;
 
50
 
 
51
    return ((const pcilib_model_description_t *(*)(pcilib_t *pcilib, unsigned short vendor_id, unsigned short device_id, const char *model))get_model)(pcilib, vendor_id, device_id, model);
 
52
}
 
53
 
 
54
const pcilib_model_description_t *pcilib_find_plugin_model(pcilib_t *pcilib, unsigned short vendor_id, unsigned short device_id, const char *model) {
 
55
    DIR *dir;
 
56
    const char *path;
 
57
    struct dirent *entry;
 
58
 
 
59
    void *plugin;
 
60
    const pcilib_model_description_t *model_info = NULL;
 
61
 
 
62
 
 
63
    path = getenv("PCILIB_PLUGIN_DIR");
 
64
    if (!path) path = PCILIB_PLUGIN_DIR;
 
65
 
 
66
    if (model) {
 
67
        plugin = pcilib_plugin_load(model);
 
68
        if (plugin) {
 
69
            model_info = pcilib_get_plugin_model(pcilib, plugin, vendor_id, device_id, model);
 
70
            if (model_info) {
 
71
                pcilib->event_plugin = plugin;
 
72
                return model_info;
 
73
            }
 
74
            pcilib_plugin_close(plugin);
 
75
        }
 
76
    }
 
77
 
 
78
    dir = opendir(path);
 
79
    if (!dir) return NULL;
 
80
 
 
81
    while ((entry = readdir(dir))) {
 
82
        const char *suffix = strstr(entry->d_name, ".so");
 
83
        if ((!suffix)||(strlen(suffix) != 3)) continue;
 
84
 
 
85
        if ((model)&&(!strcmp(entry->d_name, model))) 
 
86
            continue;
 
87
 
 
88
        plugin = pcilib_plugin_load(entry->d_name);
 
89
        if (plugin) {
 
90
            model_info = pcilib_get_plugin_model(pcilib, plugin, vendor_id, device_id, model);
 
91
            if (model_info) {
 
92
                pcilib->event_plugin = plugin;
 
93
                break;
 
94
            }
 
95
            pcilib_plugin_close(plugin);
 
96
        }
 
97
    }
 
98
 
 
99
    closedir(dir);
 
100
    return model_info;
 
101
}