|
@@ -370,6 +370,107 @@ core-app-hrl-recursive: build clean-core-app-hrl-recursive
|
|
|
[{module, M} = code:load_file(M) || M <- Mods], \
|
|
|
halt()"
|
|
|
|
|
|
+core-app-mib: build clean-core-app-mib
|
|
|
+
|
|
|
+ $i "Bootstrap a new OTP library named $(APP)"
|
|
|
+ $t mkdir $(APP)/
|
|
|
+ $t cp ../erlang.mk $(APP)/
|
|
|
+ $t $(MAKE) -C $(APP) -f erlang.mk bootstrap-lib $v
|
|
|
+
|
|
|
+ $i "Download .mib files from Erlang/OTP"
|
|
|
+ $t mkdir $(APP)/mibs/
|
|
|
+ $t curl -s -o $(APP)/mibs/EX1-MIB.mib $(OTP_MASTER)/lib/snmp/examples/ex1/EX1-MIB.mib
|
|
|
+ $t curl -s -o $(APP)/mibs/OTP-REG.mib $(OTP_MASTER)/lib/otp_mibs/mibs/OTP-REG.mib
|
|
|
+
|
|
|
+ $i "Generate .erl files dependent from headers generated by .mib files"
|
|
|
+ $t printf "%s\n" "-module(use_v1)." "-include(\"EX1-MIB.hrl\")." > $(APP)/src/use_v1.erl
|
|
|
+ $t printf "%s\n" "-module(use_v2)." "-include(\"OTP-REG.hrl\")." > $(APP)/src/use_v2.erl
|
|
|
+
|
|
|
+ $i "Build the application"
|
|
|
+ $t $(MAKE) -C $(APP) $v
|
|
|
+
|
|
|
+ $i "Check that all compiled files exist"
|
|
|
+ $t test -f $(APP)/$(APP).d
|
|
|
+ $t test -f $(APP)/ebin/$(APP).app
|
|
|
+ $t test -f $(APP)/ebin/use_v1.beam
|
|
|
+ $t test -f $(APP)/ebin/use_v2.beam
|
|
|
+ $t test -f $(APP)/include/EX1-MIB.hrl
|
|
|
+ $t test -f $(APP)/include/OTP-REG.hrl
|
|
|
+ $t test -f $(APP)/priv/mibs/EX1-MIB.bin
|
|
|
+ $t test -f $(APP)/priv/mibs/OTP-REG.bin
|
|
|
+
|
|
|
+ $i "Check that the application was compiled correctly"
|
|
|
+ $t $(ERL) -pa $(APP)/ebin/ -eval " \
|
|
|
+ ok = application:start($(APP)), \
|
|
|
+ {ok, Mods = [use_v1, use_v2]} \
|
|
|
+ = application:get_key($(APP), modules), \
|
|
|
+ [{module, M} = code:load_file(M) || M <- Mods], \
|
|
|
+ halt()"
|
|
|
+
|
|
|
+ $i "Touch one .mib file; check that only required files are rebuilt"
|
|
|
+# The use_v1.erl gets touched because of its dependency to EX1-MIB.hrl.
|
|
|
+ $t printf "%s\n" \
|
|
|
+ $(APP)/$(APP).d \
|
|
|
+ $(APP)/ebin/$(APP).app \
|
|
|
+ $(APP)/ebin/use_v1.beam \
|
|
|
+ $(APP)/include/EX1-MIB.hrl \
|
|
|
+ $(APP)/priv/mibs/EX1-MIB.bin \
|
|
|
+ $(APP)/src/use_v1.erl | sort > $(APP)/EXPECT
|
|
|
+ $t touch $(APP)/mibs/EX1-MIB.mib
|
|
|
+ $t $(MAKE) -C $(APP) $v
|
|
|
+ $t find $(APP) -type f -newer $(APP)/mibs/EX1-MIB.mib | sort | diff $(APP)/EXPECT -
|
|
|
+ $t rm $(APP)/EXPECT
|
|
|
+
|
|
|
+ $i "Check that the application was compiled correctly"
|
|
|
+ $t $(ERL) -pa $(APP)/ebin/ -eval " \
|
|
|
+ ok = application:start($(APP)), \
|
|
|
+ {ok, Mods = [use_v1, use_v2]} \
|
|
|
+ = application:get_key($(APP), modules), \
|
|
|
+ [{module, M} = code:load_file(M) || M <- Mods], \
|
|
|
+ halt()"
|
|
|
+
|
|
|
+ $i "Clean the application"
|
|
|
+ $t $(MAKE) -C $(APP) clean $v
|
|
|
+
|
|
|
+ $i "Check that source files still exist"
|
|
|
+ $t test -f $(APP)/Makefile
|
|
|
+ $t test -f $(APP)/erlang.mk
|
|
|
+ $t test -d $(APP)/include/
|
|
|
+ $t test -f $(APP)/mibs/EX1-MIB.mib
|
|
|
+ $t test -f $(APP)/mibs/OTP-REG.mib
|
|
|
+ $t test -f $(APP)/src/$(APP).app.src
|
|
|
+ $t test -f $(APP)/src/use_v1.erl
|
|
|
+ $t test -f $(APP)/src/use_v2.erl
|
|
|
+
|
|
|
+ $i "Check that all build artifacts are removed, including intermediates"
|
|
|
+ $t test ! -e $(APP)/$(APP).d
|
|
|
+ $t test ! -e $(APP)/ebin/
|
|
|
+ $t test ! -e $(APP)/include/EX1-MIB.hrl
|
|
|
+ $t test ! -e $(APP)/include/OTP-REG.hrl
|
|
|
+ $t test ! -e $(APP)/priv/mibs/EX1-MIB.bin
|
|
|
+ $t test ! -e $(APP)/priv/mibs/OTP-REG.bin
|
|
|
+
|
|
|
+ $i "Build the application again"
|
|
|
+ $t $(MAKE) -C $(APP) $v
|
|
|
+
|
|
|
+ $i "Check that all compiled files exist"
|
|
|
+ $t test -f $(APP)/$(APP).d
|
|
|
+ $t test -f $(APP)/ebin/$(APP).app
|
|
|
+ $t test -f $(APP)/ebin/use_v1.beam
|
|
|
+ $t test -f $(APP)/ebin/use_v2.beam
|
|
|
+ $t test -f $(APP)/include/EX1-MIB.hrl
|
|
|
+ $t test -f $(APP)/include/OTP-REG.hrl
|
|
|
+ $t test -f $(APP)/priv/mibs/EX1-MIB.bin
|
|
|
+ $t test -f $(APP)/priv/mibs/OTP-REG.bin
|
|
|
+
|
|
|
+ $i "Check that the application was compiled correctly"
|
|
|
+ $t $(ERL) -pa $(APP)/ebin/ -eval " \
|
|
|
+ ok = application:start($(APP)), \
|
|
|
+ {ok, Mods = [use_v1, use_v2]} \
|
|
|
+ = application:get_key($(APP), modules), \
|
|
|
+ [{module, M} = code:load_file(M) || M <- Mods], \
|
|
|
+ halt()"
|
|
|
+
|
|
|
clean-core-app: $(CORE_APP_CLEAN_TARGETS)
|
|
|
|
|
|
$(CORE_APP_CLEAN_TARGETS):
|