File 5783-preloaded-enet-Add-net-getservbyport.patch of Package erlang

From 8be3148602a9e7ca7405b18c0a908a2294528463 Mon Sep 17 00:00:00 2001
From: Micael Karlberg <bmk@erlang.org>
Date: Mon, 15 Apr 2024 17:37:51 +0200
Subject: [PATCH 03/18] [preloaded|enet] Add net:getservbyport

---
 erts/preloaded/ebin/prim_net.beam | Bin 2696 -> 2800 bytes
 erts/preloaded/src/prim_net.erl   |  15 +++++++++++++++
 2 files changed, 15 insertions(+)

diff --git a/erts/preloaded/src/prim_net.erl b/erts/preloaded/src/prim_net.erl
index d34f352a1f..389e159aba 100644
--- a/erts/preloaded/src/prim_net.erl
+++ b/erts/preloaded/src/prim_net.erl
@@ -40,6 +40,7 @@
          get_interface_info/1,
          get_ip_address_table/1,
          getservbyname/2,
+         getservbyport/2,
 
          if_name2index/1,
          if_index2name/1,
@@ -576,6 +577,17 @@ getservbyname(Name, Proto) when is_list(Name) andalso is_list(Proto) ->
 
 
 
+%% ===========================================================================
+%%
+%% getservbyport - Get service by name
+%%
+
+getservbyport(PortNumber, Proto)
+  when is_integer(PortNumber) andalso is_list(Proto) ->
+    nif_getservbyport(PortNumber, Proto).
+
+
+
 %% ===========================================================================
 %%
 %% if_name2index - Mappings between network interface names and indexes:
@@ -698,6 +710,9 @@ nif_get_ip_address_table(_Args) ->
 nif_getservbyname(_Name, _Proto) ->
     erlang:nif_error(notsup).
 
+nif_getservbyport(_PortNumber, _Proto) ->
+    erlang:nif_error(notsup).
+
 nif_if_name2index(_Name) ->
     erlang:nif_error(notsup).
 
-- 
2.35.3