4

この大規模なC++プロジェクトがあり、並列makeがないプラットフォーム（Linuxのmake -jなど）でビルドする必要があります。サーバーには6つのCPUがあり、手動で並列ビルドを実行したいと思います。

このようなタスクリストを約300個のオブジェクトファイルに対して生成できます。依存関係のチェックとインクリメンタルビルドにMakefileを使用します。

make -f Makefile obj1.o

make -f Makefile obj2.o

make -f Makefileobj3.o..。

KshとPerlを使用して一度に6つ以下のタスクを実行しながら、これらのタスクを並行して実行するにはどうすればよいですか？（JavaまたはPythonは使用できません:-(）

4

5 に答える 5

5

Perlでは、 Parallel::ForkManagerを確認する必要があります。あなたはこのようなことをすることができます：

my @make_obj = qw(
  obj1.o
  obj2.o
  obj3.o
  ...
);

my $fm = $pm = new Parallel::ForkManager(6);
foreach my $obj (@make_obj) {
  $fm->start and next;
  system("make -f Makefile $make_obj");
  $fm->finish();
}
于 2008-10-29T21:16:49.607 に答える
4

fork に代わる方法は、各 make を独自のスレッドで実行することです。

use threads;

my $max_threads = 5;

my @targets = qw(obj1.o obj2.o obj3.o ...);
while(@targets) {
    my $num_threads = threads->list(threads::running);
    if( $num_threads < $max_threads ) {
        my $target = shift @targets;
        threads->create(sub { return system "make $target" });
    }
}

残念ながら、私は 2 ビットほど手を振っています。1 つ目は、スレッドが終了するまでループを静止状態で待機させることです。これは、threads::shared の cond_wait() とセマフォ変数を使用して達成されると思います。

2 つ目は、make から戻り値を取得することです。これにより、何かが失敗した場合にビルドを停止することができます。そのためには、各スレッドを join() して、プロセスの終了コードである system() の結果を取得する必要があります。

急ぎの返信で申し訳ありません。コミュニティが残りを埋めてくれることを願っています。

于 2008-10-30T00:13:01.933 に答える
3

HPUX 上の gnu make には -j フラグがありませんか?

http://hpux.connect.org.uk/hppd/hpux/Gnu/make-3.81/

于 2008-10-30T00:42:58.817 に答える
-1

OS がプロセッサ間通信とスケジューリングを適切に処理している場合、相互依存関係がない限り、すべての make をバックグラウンド プロセスに投入できるはずです。

それらがすべて独立している場合、次のような一連のコマンドを発行します。

make -f Makefile obj1.o &
make -f Makefile obj2.o &
...
make -f Makefile objn.o &

&&依存関係がある場合は、「親」が終了するまで依存項目が開始されないように、2 つのアンパサンド ( ) でそれらをつなぎます。

私はそれがあなたが要求した解決策ではないことを認識していますが、それは私が問題を攻撃する方法です:)

于 2008-10-29T20:49:39.803 に答える