xlc_r を使用して AIX 5.3 で Ruby 1.9.3-p125 をコンパイルしようとしています。--enable-load-relative を使用したいのですが、それは Ruby 共有ライブラリのパス名を取得するために dladdr() 関数に依存しており、dladdr() は AIX では使用できません。loadquery(L_GETINFO) の呼び出しに基づいて、AIXのroot.cern.chで dladdr() の実装を見つけました。
loadquery(L_GETINFO) 呼び出しは、プログラムを構成するバイナリ ファイルのリストを取得します。dladdr() を実装するために、dladdr に渡された関数のアドレスが ldinfo_textorg と ldinfo_textorg+ldinfo_textsize の間にあるかどうかを確認しています。しかし、関数のアドレスは、返されたどの構造体についても、このアドレス範囲内にありません。ld_info 構造を正しく解釈していない可能性があります。
テスト中のコードを添付しました。これらの質問に対して提供できるヘルプは、非常に高く評価されます。
#include <sys/types.h>
#include <sys/ldr.h>
#include <stdlib.h>
#include <stdio.h>
typedef struct {
char* dli_fname;
} Dl_info;
int
dladdr(void* s, Dl_info* i) {
size_t bufSize = 40960;
struct ld_info* ldi;
void *buf;
int r;
printf("sym at %lu\n", (ulong)s);
buf = (void *)malloc(bufSize);
if (!buf) {
i->dli_fname = 0;
return 0;
}
r = loadquery((int)L_GETINFO, buf, (int)bufSize);
if (r == -1) {
i->dli_fname = 0;
return 0;
}
do {
ldi = (struct ld_info*)buf;
printf("checking %s, text %lu - %lu\n", ldi->ldinfo_filename, (ulong)ldi->ldinfo_textorg, (ulong)(ldi->ldinfo_textorg + ldi->ldinfo_textsize));
if ((ldi->ldinfo_textorg <= s)
&& (s < (ldi->ldinfo_textorg + ldi->ldinfo_textsize))) {
i->dli_fname = ldi->ldinfo_filename;
return 1;
}
buf += ldi->ldinfo_next;
} while (ldi->ldinfo_next);
i->dli_fname = 0;
return 0;
}
int
test_func() { 1; }
int
main() {
Dl_info dli;
int rc = dladdr((void *)test_func, &dli);
printf("rc = %d\n", rc);
if (rc) {
printf("dli.dli_fname = %s\n", dli.dli_fname);
}
}
2012 年 4 月 30 日更新: 最初にこの質問を投稿したとき、loadquery(L_GETINFO) が 64 ビット プログラムから呼び出されたときにセグメンテーション違反を引き起こすことも確認しました。私は 64 ビットなしでは生きていけないので、これは私にとって目を見張るものでした。これは、コンパイラのインストールに問題があるようです。他の AIX マシンは、64 ビット モードでコードをコンパイルして実行できます。
スタック バック トレースは次のようになります。
.() at 0xf458
usl_getinfo_user(??, ??, ??, ??) at 0x9fffffff00096b8
uloadquery(??, ??, ??, ??, ??, ??, ??) at 0x9fffffff0009b40
loadquery(0x200000002, 0x1000b3f0, 0xa0000000a000, 0x0, 0x0, 0x0, 0x0, 0x0) at 0x900000000043874
dladdr(s = 0x0000000110000900, i = 0x0ffffffffffffa00), line 18 in "dladdr.c"
main(), line 11 in "test_dladdr.c"