83 lines
2.1 KiB
Plaintext
83 lines
2.1 KiB
Plaintext
; --------------------------------------------------------------------------------
|
|
; @Title: ChibiOS/RT Demo for TRACE32 OS Awareness
|
|
; @Description:
|
|
;
|
|
; This batchfile loads all necessary files to demonstrate
|
|
; the OS Awareness for ChibiOS/RT.
|
|
;
|
|
; @Keywords: RTOS, ChibiOS
|
|
; @Author: DIE
|
|
; @Copyright: (C) 1989-2022 Lauterbach GmbH, licensed for use with TRACE32(R) only
|
|
; --------------------------------------------------------------------------------
|
|
; $Id: chibios.cmm 18850 2022-01-26 18:41:29Z bschroefel $
|
|
|
|
SCREEN.ON ; all messages are displayed
|
|
AREA.RESet
|
|
WinPAGE.RESet
|
|
WinPOS 0 24. 70. 8. 0. 0. W000
|
|
AREA.view
|
|
|
|
; Debugger reset
|
|
PRINT "resetting..." ; send to message line
|
|
RESet ; reset Instrument
|
|
|
|
; Debugger initializations
|
|
PRINT "initializing..." ; send to message line
|
|
SYStem.CPU STM32F101
|
|
IF INTERFACE.SIM()
|
|
(
|
|
IF SOFTWARE.64BIT()
|
|
SIM.LOAD ~~\demo\arm\simul\intc_cortexm3\nvic_x64.dll
|
|
ELSE
|
|
SIM.LOAD ~~\demo\arm\simul\intc_cortexm3\nvic.dll
|
|
)
|
|
SYStem.Up
|
|
|
|
; print "loading application..."
|
|
Data.LOAD.Elf ch.elf
|
|
Register.Set PC ResetHandler
|
|
|
|
; initialize RTOS support
|
|
PRINT "initializing ChibiOS support..."
|
|
TASK.CONFIG ~~/demo/arm/kernel/chibios/chibios.t32 ; load ChibiOS/RT Awareness
|
|
MENU.ReProgram ~~/demo/arm/kernel/chibios/chibios.men ; load ChibiOS/RT Menu
|
|
HELP.FILTER.Add rtoschibios
|
|
TASK.STacK.PATtern 0x55
|
|
|
|
; the example contains a memory mapped terminal emulation
|
|
print "opening terminal..."
|
|
winpos 65. 9. ,,,,, term
|
|
TERM.METHOD SingleE T32_OUT 0
|
|
TERM
|
|
|
|
; open source window
|
|
WinPOS 0. 0. 70. 21.
|
|
List.auto
|
|
|
|
; Go over initializations
|
|
Go main
|
|
print "initializing ChibiOS..."
|
|
wait !STATE.RUN()
|
|
|
|
; Set symbols on thread's work area for thread naming
|
|
sYmbol.NEW test1 v.value(wa[1])
|
|
sYmbol.NEW test2 v.value(wa[2])
|
|
sYmbol.NEW test3 v.value(wa[3])
|
|
sYmbol.NEW test4 v.value(wa[4])
|
|
|
|
; open threads window
|
|
WinPOS 75. 0. 50. 6.
|
|
TASK.Thread
|
|
|
|
; let the system run
|
|
|
|
wintop term
|
|
Go TestThread
|
|
print "initializing application..."
|
|
wait !STATE.RUN()
|
|
|
|
Go _default_exit
|
|
print "running application."
|
|
|
|
ENDDO
|