int
__pmDecodeDesc(__pmPDU *pdubuf, pmDesc *desc)
{
desc_t *pp;
char *pduend;
pp = (desc_t *)pdubuf;
pduend = (char *)pdubuf + pp->hdr.len;
if (pduend - (char*)pp != sizeof(desc_t))
return PM_ERR_IPC;
desc->type = ntohl(pp->desc.type);
desc->sem = ntohl(pp->desc.sem);
desc->indom = __ntohpmInDom(pp->desc.indom);
desc->units = __ntohpmUnits(pp->desc.units);
desc->pmid = __ntohpmID(pp->desc.pmid);
return 0;
}
/*
* load _all_ of the hashed pmDesc and __pmLogInDom structures from the metadata
* log file -- used at the initialization (NewContext) of an archive
* If version 2 then
* load all the names from the meta data and create l_pmns.
*/
int
__pmLogLoadMeta(__pmLogCtl *lcp)
{
int rlen;
int check;
pmDesc *dp;
int sts = 0;
__pmLogHdr h;
FILE *f = lcp->l_mdfp;
int version2 = ((lcp->l_label.ill_magic & 0xff) == PM_LOG_VERS02);
int numpmid = 0;
int n;
if (version2) {
if ((sts = __pmNewPMNS(&(lcp->l_pmns))) < 0) {
goto end;
}
}
fseek(f, (long)(sizeof(__pmLogLabel) + 2*sizeof(int)), SEEK_SET);
for ( ; ; ) {
n = (int)fread(&h, 1, sizeof(__pmLogHdr), f);
/* swab hdr */
h.len = ntohl(h.len);
h.type = ntohl(h.type);
if (n != sizeof(__pmLogHdr) || h.len <= 0) {
if (feof(f)) {
clearerr(f);
sts = 0;
goto end;
}
#ifdef PCP_DEBUG
if (pmDebug & DBG_TRACE_LOGMETA) {
fprintf(stderr, "__pmLogLoadMeta: header read -> %d: expected: %d\n",
n, (int)sizeof(__pmLogHdr));
}
#endif
if (ferror(f)) {
clearerr(f);
sts = -errno;
}
else
sts = PM_ERR_LOGREC;
goto end;
}
#ifdef PCP_DEBUG
if (pmDebug & DBG_TRACE_LOGMETA) {
fprintf(stderr, "__pmLogLoadMeta: record len=%d, type=%d @ offset=%d\n",
h.len, h.type, (int)(ftell(f) - sizeof(__pmLogHdr)));
}
#endif
rlen = h.len - (int)sizeof(__pmLogHdr) - (int)sizeof(int);
if (h.type == TYPE_DESC) {
numpmid++;
if ((dp = (pmDesc *)malloc(sizeof(pmDesc))) == NULL) {
sts = -errno;
goto end;
}
if ((n = (int)fread(dp, 1, sizeof(pmDesc), f)) != sizeof(pmDesc)) {
#ifdef PCP_DEBUG
if (pmDebug & DBG_TRACE_LOGMETA) {
fprintf(stderr, "__pmLogLoadMeta: pmDesc read -> %d: expected: %d\n",
n, (int)sizeof(pmDesc));
}
#endif
if (ferror(f)) {
clearerr(f);
sts = -errno;
}
else
sts = PM_ERR_LOGREC;
goto end;
}
else {
/* swab desc */
dp->type = ntohl(dp->type);
dp->sem = ntohl(dp->sem);
dp->indom = __ntohpmInDom(dp->indom);
dp->units = __ntohpmUnits(dp->units);
dp->pmid = __ntohpmID(dp->pmid);
}
if ((sts = __pmHashAdd((int)dp->pmid, (void *)dp, &lcp->l_hashpmid)) < 0)
goto end;
if (version2) {
char name[MAXPATHLEN];
int numnames;
int i;
int len;
/* read in the names & store in PMNS tree ... */
if ((n = (int)fread(&numnames, 1, sizeof(numnames), f)) !=
sizeof(numnames)) {
#ifdef PCP_DEBUG
if (pmDebug & DBG_TRACE_LOGMETA) {
fprintf(stderr, "__pmLogLoadMeta: numnames read -> %d: expected: %d\n",
n, (int)sizeof(numnames));
}
#endif
if (ferror(f)) {
clearerr(f);
sts = -errno;
}
else
sts = PM_ERR_LOGREC;
goto end;
}
else {
/* swab numnames */
numnames = ntohl(numnames);
}
for (i = 0; i < numnames; i++) {
if ((n = (int)fread(&len, 1, sizeof(len), f)) !=
sizeof(len)) {
#ifdef PCP_DEBUG
if (pmDebug & DBG_TRACE_LOGMETA) {
fprintf(stderr, "__pmLogLoadMeta: len name[%d] read -> %d: expected: %d\n",
i, n, (int)sizeof(len));
}
#endif
if (ferror(f)) {
clearerr(f);
sts = -errno;
}
else
sts = PM_ERR_LOGREC;
goto end;
}
else {
/* swab len */
len = ntohl(len);
}
if ((n = (int)fread(name, 1, len, f)) != len) {
#ifdef PCP_DEBUG
if (pmDebug & DBG_TRACE_LOGMETA) {
fprintf(stderr, "__pmLogLoadMeta: name[%d] read -> %d: expected: %d\n",
i, n, len);
}
#endif
if (ferror(f)) {
clearerr(f);
sts = -errno;
}
else
sts = PM_ERR_LOGREC;
goto end;
}
name[len] = '\0';
#ifdef PCP_DEBUG
if (pmDebug & DBG_TRACE_LOGMETA) {
fprintf(stderr, "__pmLogLoadMeta: PMID: %s name: %s\n",
pmIDStr(dp->pmid), name);
}
#endif
if ((sts = __pmAddPMNSNode(lcp->l_pmns, dp->pmid, name)) < 0) {
/*
* If we see a duplicate PMID, its a recoverable error.
* We wont be able to see all of the data in the log, but
* its better to provide access to some rather than none,
* esp. when only one or two metric IDs may be corrupted
* in this way (which we may not be interested in anyway).
*/
if (sts != PM_ERR_PMID)
goto end;
sts = 0;
}
}/*for*/
}/*version2*/
}
else if (h.type == TYPE_INDOM) {
int *tbuf;
pmInDom indom;
__pmTimeval *when;
int numinst;
int *instlist;
char **namelist;
char *namebase;
int *stridx;
int i;
int k;
int allinbuf;
if ((tbuf = (int *)malloc(rlen)) == NULL) {
sts = -errno;
goto end;
}
if ((n = (int)fread(tbuf, 1, rlen, f)) != rlen) {
#ifdef PCP_DEBUG
if (pmDebug & DBG_TRACE_LOGMETA) {
fprintf(stderr, "__pmLogLoadMeta: indom read -> %d: expected: %d\n",
n, rlen);
}
#endif
if (ferror(f)) {
clearerr(f);
sts = -errno;
}
else
sts = PM_ERR_LOGREC;
goto end;
}
k = 0;
when = (__pmTimeval *)&tbuf[k];
when->tv_sec = ntohl(when->tv_sec);
when->tv_usec = ntohl(when->tv_usec);
k += sizeof(*when)/sizeof(int);
indom = __ntohpmInDom((unsigned int)tbuf[k++]);
numinst = ntohl(tbuf[k++]);
if (numinst > 0) {
instlist = &tbuf[k];
k += numinst;
stridx = &tbuf[k];
#if defined(HAVE_32BIT_PTR)
namelist = (char **)stridx;
allinbuf = 1; /* allocation is all in tbuf */
#else
allinbuf = 0; /* allocation for namelist + tbuf */
/* need to allocate to hold the pointers */
namelist = (char **)malloc(numinst*sizeof(char*));
if (namelist == NULL) {
sts = -errno;
goto end;
}
#endif
k += numinst;
namebase = (char *)&tbuf[k];
for (i = 0; i < numinst; i++) {
instlist[i] = ntohl(instlist[i]);
namelist[i] = &namebase[ntohl(stridx[i])];
}
}
else {
/* no instances, or an error */
instlist = NULL;
namelist = NULL;
}
if ((sts = addindom(lcp, indom, when, numinst, instlist, namelist, tbuf, allinbuf)) < 0)
goto end;
}
else
fseek(f, (long)rlen, SEEK_CUR);
n = (int)fread(&check, 1, sizeof(check), f);
check = ntohl(check);
if (n != sizeof(check) || h.len != check) {
#ifdef PCP_DEBUG
if (pmDebug & DBG_TRACE_LOGMETA) {
fprintf(stderr, "__pmLogLoadMeta: trailer read -> %d or len=%d: expected %d @ offset=%d\n",
n, check, h.len, (int)(ftell(f) - sizeof(check)));
}
#endif
if (ferror(f)) {
clearerr(f);
sts = -errno;
}
else
sts = PM_ERR_LOGREC;
goto end;
}
}/*for*/
end:
fseek(f, (long)(sizeof(__pmLogLabel) + 2*sizeof(int)), SEEK_SET);
if (version2 && sts == 0) {
__pmFixPMNSHashTab(lcp->l_pmns, numpmid, 1);
}
return sts;
}