看到關于Makefile的必要性討論,忽然想起自己干過一些有趣的的事情。
一個目錄下有一大堆同質或不同質的程序,要測試系統處理并發(fā)任務的效率不得不寫一個任務分發(fā)器(work load manager),用C寫對新手來說還是有點大條的,利用make -j可以模擬一個簡單的wlm。代碼大概如下:
binaries := $(foreach ccode, \
$(shell for cfile in `ls *.c`; do echo $cfile; done),\
$(ccode:.c=))
$(binaries): %:%.c
@echo BLD $@
@gcc -o $@ $《 》/dev/null 2》&1
to_run := $(foreach ccode, \
$(shell for cfile in `ls *.c`; do echo $cfile; done),\
to_run_$(ccode:.c=))
run: clean $(to_run)
to_run_%: %
@to_run=$@; \
echo ${to_run##to_run_};
clean:
@echo -n “-------------------------------- CLEAN ”
@echo “--------------------------------”
@echo RMV $(binaries)
@rm -f $(binaries)
.PHONY: run clean
運行 make -jN 即可
簡而言之就是:
1. default 的 target 是 run,run 依賴于 clean 和 to_run
run: clean $(to_run)
2. to_run 是由一段 shell 產生的
to_run := $(foreach ccode, \
$(shell for cfile in `ls *.c`; do echo $cfile; done),\
to_run_$(ccode:.c=))
3. 假設目錄下有 1.c 2.c 3.c 4.c 。。. 100.c 這100個c程序, 那段 shell 生成的變量 to_run 等于這樣的一串: to_run_1 to_run2 。。. to_run_100
4. to_run_%: % 那一段 rule 的意思是對于某個目標 to_run_73 依賴于 73,當 73 不存在或者 73.c 被更新過, make 就按照上面聲明的 binaries 的規(guī)則去(重新)生成它:
$(binaries): %:%.c
@echo BLD $@
@gcc -o $@ $《 》/dev/null 2》&1
5. 73 生成以后就運行它,示例里用的是 echo
@to_run=$@; \
echo ${to_run##to_run_};
實際上可以是
@to_run=$@; \
。/${to_run##to_run_};
這樣 73 就在適當的時候被運行了。
假設輸入 make -j32 run,結果就是可執(zhí)行文件 1, 2, 3 。。. 32 同時被運行,其中的某個結束后 make 會自動啟動后面的 33, 34 。。. 直至所有的運行結束,這就模擬了一個簡單的本地 work load manager。
這個make腳本的另外一個變種可以是:你有一個程序(假設叫 EXEC0),在一臺16核的機器上你希望并行地運行32個帶不同參數的 EXEC0 實例,總共運行 1024 個實例來測試系統或者 EXEC0 的運行效率,Makefile大概可以這樣寫:
ifeq ($(MAX),)
MAX=1024
endif
parameter0=0
parameter1=11
parameter2=22
parameter3=33
prerequisites := $(foreach num, \
$(shell i=0; while [ $$i -lt $(MAX) ]; \
do \
echo $$i; \
i=$$((i + 1)); \
done), \
target_$(num))
run:$(prerequisites)
EXEC0: EXEC0.c
gcc -o $@ $《
target_%:EXEC0
@./EXEC0 $(parameter$(shell expr $(subst target_,,$@) % 4))
.PHONY: run
一個無聊的EXEC0.c 可以是:
int
main(int argc, char **argv)
{
sleep(atoi(argv[1]));
printf(“%s %d\n”, argv[0], atoi(argv[1]));
return 0;
}
然后make -j32 MAX=1024
/////////////////////////////////////////////////////////////////////////////////////////////////////////
試驗記錄:
testcase := $(shell for test in `ls 。。/tests/`; do echo $$test; done)
to_run := $(foreach test, \
$(shell for test in `ls 。。/tests/`; do echo $$test; done), \
to_run_$(test))
run : $(to_run)
to_run_%:
@to_run=$@; \
run_test $${to_run##to_run_};
#$(shell grep -rn “Error” 。/$${to_run##to_run_}/irun.log 》》 error.log)
clean:
@echo -n “-------------------------- CLEAN”
@echo “--------------------------”
@echo RMV $(testcase)
@rm -rf $(testcase)
.PHONY: run clean
評論