/***********************************************************************
* *
* This software is part of the ast package *
* Copyright (c) 1997-2012 AT&T Intellectual Property *
* and is licensed under the *
* Eclipse Public License, Version 1.0 *
* by AT&T Intellectual Property *
* *
* A copy of the License is available at *
* http://www.eclipse.org/org/documents/epl-v10.html *
* (with md5 checksum b35adb5213ca9657e911e9befb180842) *
* *
* Information and Software Systems Research *
* AT&T Research *
* Florham Park NJ *
* *
* Glenn Fowler <gsf@research.att.com> *
* *
***********************************************************************/
#pragma prototyped
/*
* Glenn Fowler
* AT&T Research
*/
#include "dlllib.h"
/*
* return plugin version for dll
* 0 if there is none
* path!=0 enables library level diagnostics
*/
extern unsigned long
dllversion(void* dll, const char* path)
{
Dll_plugin_version_f pvf;
if (pvf = (Dll_plugin_version_f)dlllook(dll, "plugin_version"))
return (*pvf)();
if (path)
{
state.error = 1;
sfsprintf(state.errorbuf, sizeof(state.errorbuf), "plugin_version() not found");
errorf("dll", NiL, 1, "dllversion: %s: %s", path, state.errorbuf);
}
return 0;
}
/*
* check if dll on path has plugin version >= ver
* 1 returned on success, 0 on failure
* path!=0 enables library level diagnostics
* cur!=0 gets actual version
*/
extern int
dllcheck(void* dll, const char* path, unsigned long ver, unsigned long* cur)
{
unsigned long v;
state.error = 0;
if (ver || cur)
{
v = dllversion(dll, path);
if (cur)
*cur = v;
}
if (!ver)
return 1;
if (!v)
return 0;
if (v < ver)
{
if (path)
{
state.error = 1;
sfsprintf(state.errorbuf, sizeof(state.errorbuf), "plugin version %lu older than caller %lu", v, ver);
errorf("dll", NiL, 1, "dllcheck: %s: %s", path, state.errorbuf);
}
return 0;
}
errorf("dll", NiL, -1, "dllversion: %s: %lu >= %lu", path, v, ver);
return 1;
}