Fix inet:port implementation

pguyot · pguyot · commit 26de3b87c3d7 · 2023-05-31T00:09:09.000+02:00
Signed-off-by: Paul Guyot &lt;pguyot@kallisys.net&gt;
diff --git a/src/platforms/generic_unix/lib/socket_driver.c b/src/platforms/generic_unix/lib/socket_driver.c
@@ -191,7 +191,7 @@ static term do_bind(Context *ctx, term address, term port)
         if (getsockname(socket_data->sockfd, (struct sockaddr *) &serveraddr, &address_len) == -1) {
             return port_create_sys_error_tuple(ctx, GETSOCKNAME_ATOM, errno);
         } else {
-            socket_data->port = term_from_int(ntohs(serveraddr.sin_port));
+            socket_data->port = ntohs(serveraddr.sin_port);
             return OK_ATOM;
         }
     }
@@ -511,7 +511,7 @@ term socket_driver_get_port(Context *ctx)
 {
     SocketDriverData *socket_data = (SocketDriverData *) ctx->platform_data;
     port_ensure_available(ctx, 7);
-    return port_create_ok_tuple(ctx, socket_data->port);
+    return port_create_ok_tuple(ctx, term_from_int(socket_data->port));
 }
 
 term socket_driver_sockname(Context *ctx)

Original file line number	Diff line number	Diff line change
`@@ -191,7 +191,7 @@ static term do_bind(Context *ctx, term address, term port)`
`191`	`191`	`if (getsockname(socket_data->sockfd, (struct sockaddr *) &serveraddr, &address_len) == -1) {`
`192`	`192`	`return port_create_sys_error_tuple(ctx, GETSOCKNAME_ATOM, errno);`
`193`	`193`	`} else {`
`194`		`- socket_data->port = term_from_int(ntohs(serveraddr.sin_port));`
	`194`	`+ socket_data->port = ntohs(serveraddr.sin_port);`
`195`	`195`	`return OK_ATOM;`
`196`	`196`	`}`
`197`	`197`	`}`
`@@ -511,7 +511,7 @@ term socket_driver_get_port(Context *ctx)`
`511`	`511`	`{`
`512`	`512`	`SocketDriverData socket_data = (SocketDriverData ) ctx->platform_data;`
`513`	`513`	`port_ensure_available(ctx, 7);`
`514`		`- return port_create_ok_tuple(ctx, socket_data->port);`
	`514`	`+ return port_create_ok_tuple(ctx, term_from_int(socket_data->port));`
`515`	`515`	`}`
`516`	`516`
`517`	`517`	`term socket_driver_sockname(Context *ctx)`