SPI: add support to pico and poci terms

Add support to alternatives to `mosi` and `miso` as described in
https://www.oshwa.org/a-resolution-to-redefine-spi-signal-names/ .

Signed-off-by: Davide Bettio <davide@uninstall.it>

CHANGELOG.md

@@ -8,6 +8,7 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 
 ### Added
 - Added `esp:get_default_mac/0` for retrieving the default MAC address on ESP32.
+- Added support for `pico` and `poci` as an alternative to `mosi` and `miso` for SPI
 
 ### Changed
 

doc/src/programmers-guide.md

@@ -1220,11 +1220,11 @@ The AtomVM SPI implementation uses the AtomVM Port mechanism and must be initial
 
 The `bus_config` properties list contains the following entries:
 
-| Key | Value Type | Required | Description |
-|-----|------------|----------|---|
-| `miso` | `integer()` | yes | SPI leader-in, follower-out pin (MOSI) |
-| `mosi` | `integer()` | yes | SPI leader-out, follower-in pin (MISO) |
-| `sclk` | `integer()` | yes | SPI clock pin (SCLK) |
+| Key              | Value Type  | Required    | Description                                  |
+|------------------|-------------|-------------|----------------------------------------------|
+| `poci` (`miso`)  | `integer()` | yes         | SPI peripheral-out, controller-in pin (MOSI) |
+| `pico` (`mosi`)  | `integer()` | yes         | SPI peripheral-in, controller-out pin (MISO) |
+| `sclk`           | `integer()` | yes         | SPI clock pin (SCLK)                         |
 
 The `device_config` entry is a properties list containing entries for each device attached to the SPI Bus.  Each entry in this list contains the user-selected name (as an atom) of the device, followed by configuration for the named device.
 

libs/eavmlib/src/spi.erl

@@ -44,7 +44,9 @@
 
 -type peripheral() :: hspi | vspi.
 -type bus_config() :: [
-    {miso, non_neg_integer()}
+    {poci, non_neg_integer()}
+    | {pico, non_neg_integer()}
+    | {miso, non_neg_integer()}
     | {mosi, non_neg_integer()}
     | {sclk, non_neg_integer()}
     | {peripheral, peripheral()}
@@ -330,34 +332,36 @@ migrate_deprecated(MaybeDeprecated) ->
 migrate_deprecated_iter(none, Accum) ->
     Accum;
 migrate_deprecated_iter({K, V, Iter}, Accum) ->
-    NewK = replace_key(K),
-    warn_deprecated(K, NewK),
+    {Status, NewK} = replace_key(K),
+    warn_deprecated(Status, K, NewK),
     migrate_deprecated_iter(maps:next(Iter), Accum#{NewK => V}).
 
 %% @private
 migrate_deprecated_fold({K, V}, Accum) ->
-    NewK = replace_key(K),
-    warn_deprecated(K, NewK),
+    {Status, NewK} = replace_key(K),
+    warn_deprecated(Status, K, NewK),
     [{NewK, V} | Accum];
 migrate_deprecated_fold(E, Accum) ->
     [E | Accum].
 
 %% @private
 replace_key(Key) ->
     case Key of
-        miso_io_num -> miso;
-        mosi_io_num -> mosi;
-        sclk_io_num -> sclk;
-        spi_cs_io_num -> cs;
-        spi_clock_hz -> clock_speed_hz;
-        spi_peripheral -> peripheral;
-        Any -> Any
+        pico -> {rename, mosi};
+        poci -> {rename, miso};
+        miso_io_num -> {warning, miso};
+        mosi_io_num -> {warning, mosi};
+        sclk_io_num -> {warning, sclk};
+        spi_cs_io_num -> {warning, cs};
+        spi_clock_hz -> {warning, clock_speed_hz};
+        spi_peripheral -> {warning, peripheral};
+        Any -> {ok, Any}
     end.
 
-warn_deprecated(Key, Key) ->
-    ok;
-warn_deprecated(OldKey, NewKey) ->
-    io:format("SPI: found deprecated ~p, use ~p instead!!!~n", [OldKey, NewKey]).
+warn_deprecated(warning, OldKey, NewKey) ->
+    io:format("SPI: found deprecated ~p, use ~p instead!!!~n", [OldKey, NewKey]);
+warn_deprecated(_Status, Key, Key) ->
+    ok.
 
 %% @private
 validate_integer_entry(Key, Map) ->