STM32CubeMXで生成したFreeRTOSとD言語を連携する方法

# はじめに

D言語を組み込み用途で使うべく、過去にいくつかの挑戦をして幾何の経験を得てきた。

- [D言語で組み込みやる](https://qiita.com/mono_shoo/items/51919efa44619db13a86)
- [特集　D言語組み込みプログラミング入門](https://qiita.com/mono_shoo/items/b38790bea859a911147f)
- [D言語からC言語へトランスパイルすればどんなマイコンだってへっちゃらだね！](https://qiita.com/mono_shoo/items/81b98ac5656a47617232)

さて、今回臨むのは、**組み込み向けのリアルタイムOSである<ruby>FreeRTOS<rt>ふりーあーるとす</rt></ruby>を使ったプロジェクトとD言語の連携**だ。
具体的には以下を行う。

- STM32CubeMXで初期化コードやFreeRTOSのコードを生成してビルドする。
- 生成した初期化コードやFreeRTOSとD言語を連携する。
- 試しにLチカする。

今回、FreeRTOSを利用するにあたり、マシンとして選んだのは「[特集　D言語組み込みプログラミング入門](https://qiita.com/mono_shoo/items/b38790bea859a911147f)」でも使用した、[Nucleo-F403REのボード](https://www.st.com/ja/evaluation-tools/nucleo-f401re.html)である。このボードを用いて、[OLED(有機ELディスプレイ)のSSD1306ドライバ](https://amzn.to/3GmMn6A)制御を行うことを目標にした。(ドライバの制御は別記事で書こうと思う)

「[特集　D言語組み込みプログラミング入門](https://qiita.com/mono_shoo/items/b38790bea859a911147f)」ではD言語以外の言語を一切使わないベアメタルプログラミングを行ったが、今回はSTM32CubeMXというCASEツールを利用することで、ハードウェアの初期化などの面倒な部分を自動化し、ある程度気の利いたAPIを提供するC言語ソースコードの生成を行った。また、これによりFreeRTOSも利用可能となる。

以下の記事は、開発環境としてWindowsの使用を前提としているが、ほかのOSを使っている人は都度読み替えていただきたい。

# 概要
- 必要なものを揃える。ダウンロード先、購入方法などを紹介する。各種プログラムのインストールについては記事にしない。
- STM32CubeMXによるプロジェクト生成を行う。OLED制御に必要なペリフェラルの設定もここで紹介する。
- D言語との連携の仕方について解説する。
- D言語プロジェクトの作り方(主にdubの設定)を紹介する。
- 最後にFreeRTOSの機能(xTimer)を使用したLチカを行うプログラムを紹介する。

今回のレシピを図にすると、以下のようになる。

![architecture.drawio.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/4c7013bd-180d-cff1-6b33-09bb7e59357c.png)



# 必要なもの
- [Nucleo-F403RE](https://www.st.com/ja/evaluation-tools/nucleo-f401re.html) : [Aamzon](https://amzn.to/31Gqctz), [秋月](https://akizukidenshi.com/catalog/g/gM-07723/), [スイッチサイエンス](https://www.switch-science.com/catalog/1619/), [マルツパーツ](https://www.marutsu.co.jp/pc/i/236960/)などで購入できる。  
  秋月やマルツなどは秋葉原の直売店に行けば店員が使い方などいろいろ教えてくれるだろう。  
  なお、Amazonは頻繁に品切れしていて、輸入販売などで万単位の値段がついていることがあるが、本来1500～2500円程度で購入可能なはず。  
  [Raspberry Pi pico](https://www.switch-science.com/catalog/6900/)や[Zero](https://www.switch-science.com/catalog/3190/)なども検討したが、最初からLEDやタクトスイッチが実装されていて、その他I/Oポートにもピンヘッダなど実装されており、今回のようなデモレベルのことをするにはとても便利なので、Nucleoを選んだ。  
  <sub>でも入手性的にはRaspberry Pi系が良さそうだし、記事映えもしそうなので最近悩んでいる。</sub>
  - [Nucleo-F401のボードのマニュアル](https://www.stmcu.jp/design/document/users_manual/52239/) : 基板の回路構成やピン配置などが記載されている。重要。
  - [Nucleoのスタートガイド的なマニュアル](https://www.stmcu.jp/design/document/users_manual/52233/)
  - [STM32F401REマイコンのプログラミングマニュアル](https://www.stmcu.jp/design/document/programming_manual/51490/) : CPU付近のハードウェア構成やレジスタの説明など。
  - [STM32F401REマイコンのリファレンスマニュアル](https://www.stmcu.jp/design/document/reference_manual/51546/) : ペリフェラルのレジスタの説明など。聖書のごとく重要。
- [LDC](https://github.com/ldc-developers/ldc/releases) : D言語コンパイラのひとつLLVM系。
- [GNU Arm Embedded Toolchain](https://developer.arm.com/tools-and-software/open-source-software/developer-tools/gnu-toolchain/gnu-rm/downloads) : ARM向けのGCCクロスコンパイラ
- [STM32CubeMX](https://www.st.com/ja/development-tools/stm32cubemx.html) : STM32マイコン向け初期コードジェネレータ
- [LLVM](https://github.com/llvm/llvm-project/releases/tag/llvmorg-13.0.0) : clang等を含むLLVMコンパイラツールセット (Optional)
- [msys2](https://www.msys2.org/) : WindowsだとGNU makeやmingw32-makeを使うのに必要。mingw32-makeが使えるならmingwでもいいし、cygwinでもいい。

※OLEDは今回の記事ではほぼ関係ないので省略する。
※インストール作業は省略する。



# STM32CubeMXによる初期コード生成
STM32CubeMXはSTマイクロ社のマイコンやボードに関して、初期化プログラムを自動生成するためのCASEツールである。
GUIツールによりピン割付やタイマー割り付け、割り込み優先度などを設定することができる。
GUIで決めた設定に従って、FreeRTOSの初期化やスタック割り付け、スタートアッププログラム、ペリフェラルの初期化を行うコードを含むメイン関数のひな型、各種ハードウェア操作用のAPIなどを自動的に生成することができる。

今回の設定のポイントをかいつまんで説明する。スクリーンショットはたくさん撮影したので、末尾に折りたたんだ状態にしておいた。

1. 起動とプロジェクト新規作成
   - (私の場合、インストール～コード生成はWindows Sandbox上で行った)
   - STM32CubeMXを開いたら、FileからNew Projectを選択
   - 品番検索で使用するボードを選択
   - Start Projectでプロジェクト作成
2. ピン構成・ペリフェラルの設定
   - <ruby>I<sup>2</sup>C<rt>あいすけあしー</rt></ruby>設定: ディスプレイドライバのSSD1306との通信用。
     - SDA, SDL, VSS(GND), AVDD(3.3V)が都合よく並んでるI2C1を使う  
       (電源のAVDDはアナログ回路用だけど、今回はOLED以外使用予定がないし、とりあえず3.3V取れるのでヨシ！)
     - I2C1のピン割付のため、PB9からI2C1_SDA、PB8からI2C1_SCLに変更
     - I2C Speed ModeをFast Modeに、I2C Clock Speed(Hz)を400kHzに変更。ハードやノイズ、信号の鈍りが許せばここをあえて遅くする必要はなさそう。
   - IWDG(独立ウォッチドッグタイマー): 死活監視の設定。
     - ウォッチドッグ(番犬)の名の通り、メインプログラムとはクロックを別にした専用のタイマーを用意し、定期的に「プログラムが正しく動いていますよ」ということを伝えることで暴走を検知する仕組み。一定時間内に通知しないとプログラムが暴走していると判断し、強制リセットを行ってくれる。
     - とりあえずプリスケーラを変更し、25秒くらいの遅い設定にした。真面目にやる場合、プログラムが死んだときのハードウェアの状態やUXを想定して適切な時間を設定する。
   - SYS: システムタイマーのソース選択
     - FreeRTOSを使用する場合、SysTickをFreeRTOSが使用するため、干渉を避けるべく別のタイマーが推奨される。
     - 今回タイマーはFreeRTOSのソフトウェアタイマーを使用し、ハードウェアのタイマーを使用する予定はないため、適当にTIM1を選択した。タイマーごとに特徴があり、使える機能が少しずつ違うので、不要なタイマーを選択する。
   - USART2: シリアル通信設定
     - 今回標準出力の出力にはSemihostingを使用することにしたので、ここは設定変更しなかった。
     - 必要な場合は設定を行う。
3. FreeRTOSの設定
   - InterfaceはCMSIS_V2を選択しました。
   - 使う予定はないものの、FPUを有効にしたりしました。
   - Config Parametersにてヒープサイズを指定できる。ここで指定したサイズはFreeRTOSのカーネルが管理するヒープの容量として使用される。また、このヒープの中から各タスクのスタックが割り当てられる。FreeRTOSをガッツリ使うのであれば、この値をできるだけ大きい値にするとよい。
   - Task And Queuesにて、タスクの設定ができる。タスクは必要な分だけこの設定ダイアログで設定するのがよい。今回はスタックサイズを256(1024byte)に設定した。ひとまず大きめに設定しておいて、後で uxTaskGetStackHighWaterMark() とかで使用量を確認して後で減らして最適化すると良い。
4. クロック設定
   - とりあえず諸々最速(デフォルト)に設定。
5. プロジェクト設定
   - Project Nameにプロジェクト名を(ターゲット名＝バイナリ名＝`*.bin`や`*.elf`のファイル名になる)
   - Project Locationにプロジェクトの絶対パスを設定。(ここに生成物が出力される)
   - Toolchain / IDE は Makefile を選択する。
   - Linker Settingsでスタックとヒープの設定をする。ここで設定するスタックは、FreeRTOSによって管理される各タスクのスタックとは別で、スタートアッププログラムで初期化され、(FreeRTOSのタスクを設定したりする)main関数で使用されるスタックである。また、ヒープについてもFreeRTOSの管理外で使用されるヒープのサイズである。
6. 追加設定
   - 割り込み処理の使用有無などを設定。使う機能はひとまず割り込み有効で良いと思う。(有効にしても使おうと思わなければ使わないで済む)
7. コード生成
   - GENERATE CODEボタンを押す。
   - ファームウェア(のひな型)のダウンロード・解凍を行い、出力される。
8. 出来上がり
   - 最後に出力先のフォルダの中身を確認。

<details><summary>**スクリーンショット**</summary><div>

1. 起動とプロジェクト新規作成
   ![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/fb44d6e6-b796-be33-f352-8c71b79529c7.png)
   ![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/d4cc76c5-4bec-acae-f9b8-d4a6208e1fe4.png)
   ![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/d0338e5f-a02d-27fd-e7ff-27d03909d8f8.png)
2. ピン構成・ペリフェラルの設定
   ![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/66b5a7be-30da-724f-2a34-cfe143fac9a1.png)
   ![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/857c64a0-65c9-a96d-fa64-ecf72622a2e3.png)
   ![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/cb894eae-1402-003a-0fbf-91d2d5559028.png)
3. FreeRTOSの設定
   ![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/3170de1b-5f8a-0a86-077c-a9003b4c1860.png)
   ![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/a5ef6423-1df0-7658-602f-414608f46cf5.png)
   ![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/1ad001b9-75c8-6a47-bc7b-04911ad3d139.png)
4. クロック設定
   ![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/9313b8a5-88f2-701b-1302-b24f73a4a325.png)
5. プロジェクト設定
   ![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/dc1b0b37-34ad-ac32-7be2-301a64a5ee99.png)
6. 追加設定
   ![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/0e3eeb5a-15ee-7b3a-b522-f2ac59ce4401.png)
7. コード生成
   ![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/c617bfec-593a-9d45-865f-5b907c7a57c0.png)
8. 出来上がり
   - ![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/3209030d-aa27-909e-8797-cad644e1460f.png)

</div></details>


# プロジェクトのMake
STM32CubeMXによりプロジェクトのひな型が作成出来たら、ひとまずMakeできることを確認する。
以下の部分がポイント。GNU Arm Embedded Toolchain の場所にパスを通すか、GCC_PATHで教えることができるようになっている。
ここが正しく設定されていれば、大体うまくいくはず。

```makefile
#######################################
# binaries
#######################################
PREFIX = arm-none-eabi-
# The gcc compiler bin path can be either defined in make command via GCC_PATH variable (> make GCC_PATH=xxx)
# either it can be added to the PATH environment variable.
ifdef GCC_PATH
CC = $(GCC_PATH)/$(PREFIX)gcc
AS = $(GCC_PATH)/$(PREFIX)gcc -x assembler-with-cpp
CP = $(GCC_PATH)/$(PREFIX)objcopy
SZ = $(GCC_PATH)/$(PREFIX)size
else
CC = $(PREFIX)gcc
AS = $(PREFIX)gcc -x assembler-with-cpp
CP = $(PREFIX)objcopy
SZ = $(PREFIX)size
endif
HEX = $(CP) -O ihex
BIN = $(CP) -O binary -S
```

```bat
> make
```

Windowsだとそのままmakeするとmkdirのexeが無いと怒られてしまうので、msys2環境で実施するのがよいかもしれない。
私はmkdirを指定できるようにした。

```
$(BUILD_DIR):
	$(MKDIR) $@
```

うまくいけば、`*.elf`ファイルや`*.bin`ファイルが生成される。
どちらも実行ファイルだが、Nucleo-F401REをUSB接続したときに認識されるUSBストレージへの書き込みでは、`*.bin`を指定する。
ドライブに放り込むだけで書き込みが完了するが、このままだと全く動きが無くてうまくいっているのかわかりにくいため、Lチカするといいだろう。

```c:Core/main.c
/* USER CODE BEGIN Header_StartDefaultTask */
/**
  * @brief  Function implementing the defaultTask thread.
  * @param  argument: Not used
  * @retval None
  */
/* USER CODE END Header_StartDefaultTask */
void StartDefaultTask(void *argument)
{
  /* USER CODE BEGIN 5 */
  /* Infinite loop */
  for(;;)
  {
    HAL_GPIO_TogglePin(LD2_GPIO_Port, LD2_Pin);
    HAL_IWDG_Refresh(&hiwdg);
    osDelay(500);
  }
  /* USER CODE END 5 */
}
```

[ここまでのソースコード](https://github.com/shoo/Nucleo-F401RE-FreeRTOS-Demo/tree/v0.0.1)

## LLVMでmake (Optional)

GNU Arm Embedded ToolchainのGCCによるビルドを紹介したが、clangでもビルドできる。どちらでもよい。今回はldc(LLVM)を使うんだし試しにと思ってclangを使った。

clangでビルドするには、Makefileの多少の書き換えが必要である。


##### LDの定義
まず、clang(lld)を使ったリンクは難しい。素直に GNU Arm Embedded Toolchain を使ったリンクを行うが吉。このため、リンク時のコマンドをコンパイラと分けるため、LDを定義する。

```makefile
#######################################
# binaries
#######################################
PREFIX = arm-none-eabi-
# The gcc compiler bin path can be either defined in make command via GCC_PATH variable (> make GCC_PATH=xxx)
# either it can be added to the PATH environment variable.
ifdef GCC_PATH
CC = $(GCC_PATH)/$(PREFIX)gcc
AS = $(GCC_PATH)/$(PREFIX)gcc -x assembler-with-cpp
CP = $(GCC_PATH)/$(PREFIX)objcopy
SZ = $(GCC_PATH)/$(PREFIX)size
else
CC = $(PREFIX)gcc
AS = $(PREFIX)gcc -x assembler-with-cpp
CP = $(PREFIX)objcopy
SZ = $(PREFIX)size
endif
HEX = $(CP) -O ihex
BIN = $(CP) -O binary -S
LD = $(CC)
MKDIR = mkdir
```
##### ASMOPTSの定義
つぎに、clangでは`-Wa,-a,-ad,-alms=...`などのアセンブラ関連のフラグが使えない。これをオプトアウトできるようにする。

ASMOPTSを作ってコンパイラフラグを消せるようにする。

```makefile
# assembler flags for gcc
ASMOPTS = -Wa,-a,-ad,-alms=$(BUILD_DIR)/$(notdir $(<:.c=.lst))
```

##### コンパイル時のオプション変更

そしてコンパイル時のオプションをこんな感じにする。

```makefile
$(BUILD_DIR)/%.o: %.c Makefile | $(BUILD_DIR) 
	$(CC) -c $(CFLAGS) $(ASMOPTS) $< -o $@

$(BUILD_DIR)/%.o: %.s Makefile | $(BUILD_DIR)
	$(AS) -c $(CFLAGS) $< -o $@

$(BUILD_DIR)/$(TARGET).elf: $(OBJECTS) Makefile
	$(LD) $(OBJECTS) $(LDFLAGS) -o $@
	$(SZ) $@
```

##### ビルド
そして、呼び出し方を以下のような感じに。

```bat:(Windows)
mingw32-make.exe all -j 8 "CC=C:/llvm/bin/clang.exe --sysroot=C:/gcc-arm-none-eabi/arm-none-eabi --target=arm-none-eabi -fshort-enums" "AS=C:/llvm/bin/clang.exe --sysroot=C:/gcc-arm-none-eabi/arm-none-eabi --target=arm-none-eabi -fshort-enums -x assembler-with-cpp" "LD=C:/gcc-arm-none-eabi/bin/arm-none-eabi-gcc.exe" "CP=C:/llvm/bin/llvm-objcopy.exe" "SZ=C:/llvm/bin/llvm-size.exe" "ASMOPTS=" "MKDIR=cmd /C mkdir"
```

clang用の各変数は以下
(clangは`C:\llvm`に、GNU Arm Embedded Toolchainは`C:\gcc-arm-none-eabi`に配置されている想定。)

- `CC=C:/llvm/bin/clang.exe --sysroot=C:/gcc-arm-none-eabi/arm-none-eabi --target=arm-none-eabi -fshort-enums`
- `AS=C:/llvm/bin/clang.exe --sysroot=C:/gcc-arm-none-eabi/arm-none-eabi --target=arm-none-eabi -fshort-enums -x assembler-with-cpp`
- `LD=C:/gcc-arm-none-eabi/bin/arm-none-eabi-gcc.exe`
- `CP=C:/llvm/bin/llvm-objcopy.exe SZ=C:/llvm/bin/llvm-size.exe`
- `SZ=C:/llvm/bin/llvm-size.exe`
- `ASMOPTS=`
- `MKDIR=cmd /C mkdir`

[ここまでのソースコード](https://github.com/shoo/Nucleo-F401RE-FreeRTOS-Demo/tree/v0.0.2)


# 本題：D言語のプログラムをリンクする

### 考え方

概要に示した図を再掲するが、以下のようなつくりでアプリケーションを構成する。

![architecture.drawio.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/11147/4c7013bd-180d-cff1-6b33-09bb7e59357c.png)

C言語側、D言語側それぞれで静的リンクライブラリ`*.a`ファイルを作って、それらをリンクしてファームウェア(`application.elf`)を作る作戦である。

D言語のプログラムは、デフォルトタスクから呼ばれる関数をD_mainとして、この中身をライブラリとして作成することにする。※図では便宜上C言語のmain関数からD_main関数を呼び出しているように書いたが、実際にはFreeRTOSのデフォルトタスクから呼び出されるようにした。

```c:Core/Src/main.c
/* USER CODE BEGIN Header_StartDefaultTask */
extern void D_main(void);
/**
  * @brief  Function implementing the defaultTask thread.
  * @param  argument: Not used
  * @retval None
  */
/* USER CODE END Header_StartDefaultTask */
void StartDefaultTask(void *argument)
{
  /* USER CODE BEGIN 5 */
  /* Infinite loop */
  for(;;)
  {
    D_main();
    osDelay(1);
  }
  /* USER CODE END 5 */
}
```

D言語のメインは以下のようになる。これを、公開APIがD_mainのみのライブラリ、という感じでビルドする。

```d:src/main.d
extern (C) void D_main() @nogc nothrow @safe
{
    /* ここにユーザーコードを書いていく */
}
```

最終的には、 (C言語側).a + (D言語側).a → application.elf → application.bin という感じにリンク・変換していくようにする。

### C言語側コードをライブラリ化する

ここで問題になるのは、C言語側(STM32CubeMXで生成したやつ)を静的リンクライブラリ`*.a`にする必要がある点だ。
やはりこのためにもまた、Makefileを書き換えて、以下のようなターゲットを作成する必要がある。

```makefile
$(BUILD_DIR)/$(TARGET).a: $(OBJECTS) Makefile
	$(CC) -r -nodefaultlibs -o $(BUILD_DIR)/$(TARGET).o $(OBJECTS)
	$(AR) crs $(BUILD_DIR)/$(TARGET).a $(BUILD_DIR)/$(TARGET).o
```

ポイントは、`$(CC) -r`を使って、パーシャルリンクを行い、一度すべての`*.o`ファイルをまとめて1つの`*.o`ファイルにリンクしてやることである。こうすることで、ウィークシンボルについて頭を悩ませる必要がなくなる。(STM32CubeMXで生成されるコードは、ウィークシンボルでスタブの仮実装を提供し、通常シンボルが定義されたらそれがオーバーライドされるような仕組みで作られている)


### D言語側のプロジェクト設定

問題はこれをビルドするためのプロジェクトの設定だが、最近のdubはだいぶ賢くなっているので以下のような感じにできる。

```json:dub.json
{
	"name": "nucleo-f401re-app",
	"importPaths": ["."],
	"stringImportPaths": ["res"],
	"targetPath": "build",
	"postGenerateCommands-arm": [
		"${LD} -mcpu=cortex-m4 -mthumb -mfloat-abi=hard -mfpu=fpv4-sp-d16 build/Nucleo-F401RE-FreeRTOS.a ${BUILD_DIR}/lib${TARGET}.a -specs=nano.specs -T${LDSCRIPT} -Wl,--start-group -lc -lm -lnosys -Wl,--end-group -Wl,-Map=build/${TARGET}.map,--cref -Wl,--gc-sections -o ${TARGET}.elf",
		"${SZ} ${TARGET}.elf",
		"${HEX} -O ihex ${TARGET}.elf ${TARGET}.hex",
		"${BIN} -O binary -S ${TARGET}.elf ${TARGET}.bin"
	],
	"buildOptions-arm": ["betterC"],
	"dflags-arm-ldc": [
		"--float-abi=hard",
		"-mcpu=cortex-m4",
		"-relocation-model=static",
		"-disable-linker-strip-dead",
		"-output-s", "-output-o", "--static"
	],
	"buildTypes": {
		"debug": {
			"buildOptions-ldc": ["debugMode", "debugInfoC"],
			"dflags-ldc": ["--gdwarf", "--dwarf-version=2"]
		}
	},
	"targetName": "application",
	"targetType": "library"
}
```

postGenerateCommandsには環境のパスなどを含めたくないので、環境変数を使い、dub.settings.jsonとかにパスの情報を記載する。

```json:dub.settings.json
{
	"defaultPostGenerateEnvironments": {
		"LDSCRIPT": "STM32F401RETx_FLASH.ld",
		"LIBDIR": "",
		"LIBS": "-lc -lm -lnosys",
		"BUILD_DIR": "build",
		"TARGET": "application",
		"LD": "C:/gcc-arm-none-eabi/bin/arm-none-eabi-gcc.exe",
		"SZ": "C:/llvm/bin/llvm-size.exe",
		"CP": "C:/llvm/bin/llvm-objcopy.exe",
		"HEX": "C:/llvm/bin/llvm-objcopy.exe -O ihex",
		"BIN": "C:/llvm/bin/llvm-objcopy.exe -O binary -S"
	}
}
```

### ビルド

以下のコマンドでビルドすることができる。

```bat
dub build -a=arm-none-eabi
```

しかし、デバッグビルドだと、 `_getpid` など複数のシンボルが見つからないというエラーが生じるので、C言語側で定義してやると良い。

```c
extern void D_main(void);
__weak int _getpid(){ return -1;}
__weak int _getpid_r(){ return -1;}
__weak int _kill(int pid, int sig){ return -1; }
__weak int _kill_r(int pid, int sig){ return -1; }
```

### Lチカ on FreeRTOS + D言語

ちなみに、せっかくなのでFreeRTOSのxTimerCreateで作ったタイマーを使ってLチカをしてみると、以下のようになる。
なお、メインとコールバック程度しか関数を作っていないので`extern(C)`がついているが、普通にD言語の関数も定義・使用できる。

```d:src/main.d
module src.main;

nothrow @nogc:
// Types
alias TickType_t = uint;
alias BaseType_t = int;
alias UBaseType_t = uint;
alias TimerHandle_t = void*;
alias IWDG_HandleTypeDef = uint;
alias HAL_StatusTypeDef = int;
alias GPIO_TypeDef = uint;
// xTimer
enum tmrCOMMAND_START = cast(BaseType_t)1;
enum tmrCOMMAND_DELETE = cast(BaseType_t)5;
extern (C) TickType_t xTaskGetTickCount() @system;
extern (C) alias TimerCallbackFunction_t = void function(TimerHandle_t xTimer);
extern (C) TimerHandle_t xTimerCreate(const(char)* pcTimerName, TickType_t xTimerPeriodInTicks, UBaseType_t uxAutoReload, void* pvTimerID, TimerCallbackFunction_t pxCallbackFunction ) @system;
extern (C) BaseType_t xTimerGenericCommand( TimerHandle_t xTimer, BaseType_t xCommandID, TickType_t xOptionalValue, BaseType_t * pxHigherPriorityTaskWoken, TickType_t xTicksToWait ) @system;
pragma(inline, true) extern (D) alias xTimerStart  = function(xTimer, xTicksToWait) => xTimerGenericCommand(xTimer, tmrCOMMAND_START, xTaskGetTickCount(), null, xTicksToWait);
pragma(inline, true) extern (D) alias xTimerDelete = function(xTimer, xTicksToWait) => xTimerGenericCommand(xTimer, tmrCOMMAND_DELETE, 0U, null, xTicksToWait);
// IWDG
extern (C) HAL_StatusTypeDef HAL_IWDG_Refresh(IWDG_HandleTypeDef* hiwdg) @system;
extern (C) extern __gshared IWDG_HandleTypeDef hiwdg;
// GPIO
extern (C) void HAL_GPIO_TogglePin(GPIO_TypeDef* GPIOx, ushort GPIO_Pin) @system;
enum PERIPH_BASE = 0x40000000UL;
enum AHB1PERIPH_BASE = PERIPH_BASE + 0x00020000UL;
enum GPIOA_BASE = AHB1PERIPH_BASE + 0x0000UL;
enum ushort GPIO_PIN_5 = cast(ushort)0x0020;
enum GPIOA = cast(GPIO_TypeDef*)GPIOA_BASE;
enum LD2_GPIO_Port = GPIOA;
enum LD2_Pin = GPIO_PIN_5;
// CMSIS
extern (C) uint osDelay(uint) @system;

// 500msごとにコールバックされる
extern (C) void onLEDTim500ms(TimerHandle_t xTimer) @trusted
{
	// Lチカ
	HAL_GPIO_TogglePin(LD2_GPIO_Port, LD2_Pin);
}

extern (C) void D_main() @trusted
{
	// タイマーの作成・破棄
	auto tim500ms = xTimerCreate("LED500MS", 500, 1, null, &onLEDTim500ms);
	scope (exit)
		xTimerDelete(tim500ms, 0);
	// タイマーの開始
	xTimerStart(tim500ms, 0);
	while (1)
	{
		// ウォッチドッグを蹴る
		HAL_IWDG_Refresh(&hiwdg);
		// タスクスイッチする
		osDelay(1);
	}
}
```

### ビルド

```bat
dub build -a=arm-none-eabi
```

### 結果
<blockquote class="twitter-tweet"><p lang="ja" dir="ltr">とりあえずD言語+FreeRTOSでLチカはできた <a href="https://t.co/tlqfqJqzkD">pic.twitter.com/tlqfqJqzkD</a></p>&mdash; SHOO (@mono_shoo) <a href="https://twitter.com/mono_shoo/status/1466082836188856320?ref_src=twsrc%5Etfw">December 1, 2021</a></blockquote> <script async src="https://platform.twitter.com/widgets.js" charset="utf-8"></script> 

### 成果物
https://github.com/shoo/Nucleo-F401RE-FreeRTOS-Demo/tree/v0.1.0

# おわりに

本記事では以下のことについて解説した。

- STM32CubeMXを使って初期化コードやハードウェアのAPI、FreeRTOSのコードを生成し、gccやclangによってビルドした。
- STM32CubeMXの生成した初期コードをライブラリ化することで、D言語で書いたプログラムを連携することができた。
- LEDをチカチカさせた。

今回のSTM32CubeMXのように、今どきハードウェアベンダーから提供されるGUIによる初期化コード生成はよくあるものであるが、生成されるコードはC言語が一般的だ。
また、FreeRTOSのようにC言語で開発されているものをいちいちほかの言語にポーティングするのもあまり現実的ではない。(特に開発者の少ないD言語では)
しかし、D言語ではC言語の資産を活用することに大きな比重を置いて開発が行われており、実際C言語と連携するのは極めて容易で、シームレスに行うことができる。本記事のように、D言語とC言語をシームレスにつなぐやり方が実際のところ現実的ではないだろうか。
さらには、D言語の最近の新しい機能で[ImportC](https://dlang.org/changelog/2.098.0.html#ImportC)という機能があり、C言語のソースコードをD言語コンパイラが解釈することが可能になりつつある。今回の記事で紹介したLチカコードでは30行くらいの「つなぎ目」がみられるが、このつなぎ目もゆくゆくはImportCにより解決できる未来が来るかもしれない。<sub><font color=silver>でもプリプロセッサのdefineとかで定義されたマクロ関数や定数のやつが軒並み消えちゃうのでdstepsとかに期待したほうがいいかもしれない。</font></sub>