|
 |
81f462 |
/****************************************************************/
|
|
|
81f462 |
/* mdso: midipix dso scavenger */
|
|
|
78ab3c |
/* Copyright (C) 2015--2017 Z. Gilboa */
|
|
|
81f462 |
/* Released under GPLv2 and GPLv3; see COPYING.MDSO. */
|
|
|
81f462 |
/****************************************************************/
|
|
|
81f462 |
|
|
|
81f462 |
#include <stdint.h>
|
|
|
81f462 |
#include <stdio.h>
|
|
|
81f462 |
#include <string.h>
|
|
|
27f67f |
|
|
|
81f462 |
#include <mdso/mdso.h>
|
|
|
18a091 |
#include "mdso_driver_impl.h"
|
|
|
27f67f |
#include "mdso_errinfo_impl.h"
|
|
|
81f462 |
|
|
|
81f462 |
static void mdso_init_asmname(char * buf, const char * fmt, const char * str)
|
|
|
81f462 |
{
|
|
|
81f462 |
char hexstr[24];
|
|
|
81f462 |
long long unsigned int crc64;
|
|
|
81f462 |
|
|
|
81f462 |
if (strlen(str) + strlen(fmt) > (PATH_MAX - 1)) {
|
|
|
81f462 |
crc64 = mdso_crc64_mbstr((const unsigned char *)str,0);
|
|
|
81f462 |
sprintf(hexstr,"%llx",crc64);
|
|
|
81f462 |
sprintf(buf,fmt,hexstr);
|
|
|
81f462 |
} else
|
|
|
81f462 |
sprintf(buf,fmt,str);
|
|
|
81f462 |
}
|
|
|
81f462 |
|
|
|
18a091 |
int mdso_create_implib_sources(const struct mdso_driver_ctx * dctx)
|
|
|
81f462 |
{
|
|
|
81f462 |
struct mdso_unit_ctx * uctx;
|
|
|
81f462 |
const char ** unit;
|
|
|
18a091 |
int fdout;
|
|
|
81f462 |
char asmname[PATH_MAX];
|
|
|
81f462 |
const char * const * sym;
|
|
|
81f462 |
int ret;
|
|
|
81f462 |
|
|
|
81f462 |
|
|
|
4cffdc |
/* symentry, symfn */
|
|
|
81f462 |
for (unit=dctx->units; *unit; unit++) {
|
|
|
81f462 |
if (mdso_get_unit_ctx(dctx,*unit,&uctx))
|
|
|
27f67f |
return MDSO_NESTED_ERROR(dctx);
|
|
|
81f462 |
|
|
|
81f462 |
for (sym=uctx->syms; *sym; sym++) {
|
|
|
c0e12c |
mdso_init_asmname(asmname,".%s_symentry.s",*sym);
|
|
|
81f462 |
|
|
|
18a091 |
if ((fdout = mdso_create_asmsrc(dctx,asmname)) < 0)
|
|
|
27f67f |
return MDSO_NESTED_ERROR(dctx);
|
|
|
81f462 |
|
|
|
18a091 |
ret = mdso_asmgen_symentry(dctx,*sym,fdout);
|
|
|
81f462 |
|
|
|
18a091 |
if (fdout != mdso_driver_fdout(dctx))
|
|
|
18a091 |
close(fdout);
|
|
|
81f462 |
|
|
|
81f462 |
if (ret < 0)
|
|
|
27f67f |
return MDSO_NESTED_ERROR(dctx);
|
|
|
81f462 |
|
|
|
080fdc |
if (uctx->stype[sym-uctx->syms] == MDSO_SYMBOL_TYPE_CODE) {
|
|
|
080fdc |
mdso_init_asmname(asmname,".%s_symfn.s",*sym);
|
|
|
81f462 |
|
|
|
18a091 |
if ((fdout = mdso_create_asmsrc(dctx,asmname)) < 0)
|
|
|
080fdc |
return MDSO_NESTED_ERROR(dctx);
|
|
|
81f462 |
|
|
|
18a091 |
ret = mdso_asmgen_symfn(dctx,*sym,fdout);
|
|
|
81f462 |
|
|
|
18a091 |
if (fdout != mdso_driver_fdout(dctx))
|
|
|
18a091 |
close(fdout);
|
|
|
81f462 |
|
|
|
080fdc |
if (ret < 0)
|
|
|
080fdc |
return MDSO_NESTED_ERROR(dctx);
|
|
|
080fdc |
}
|
|
|
81f462 |
}
|
|
|
81f462 |
|
|
|
81f462 |
mdso_free_unit_ctx(uctx);
|
|
|
81f462 |
}
|
|
|
81f462 |
|
|
|
4cffdc |
/* dsometa */
|
|
|
4cffdc |
mdso_init_asmname(asmname,".dsometa_%s.s",dctx->cctx->libname);
|
|
|
4cffdc |
|
|
|
18a091 |
if ((fdout = mdso_create_asmsrc(dctx,asmname)) < 0)
|
|
|
4cffdc |
return MDSO_NESTED_ERROR(dctx);
|
|
|
4cffdc |
|
|
|
18a091 |
ret = mdso_asmgen_dsometa(dctx,fdout);
|
|
|
4cffdc |
|
|
|
18a091 |
if (fdout != mdso_driver_fdout(dctx))
|
|
|
18a091 |
close(fdout);
|
|
|
4cffdc |
|
|
|
4cffdc |
return (ret < 0) ? MDSO_NESTED_ERROR(dctx) : 0;
|
|
|
81f462 |
}
|