%% options copyright owner = Dirk Krause copyright year = 2016-xxxx license = bsd %% module #include "dk4sock.h" $!trace-include dk4_socket_t dk4socket_c8_udp_client_for_host( dk4_sockaddr_storage_t *array, const char *remhost, unsigned short remport, unsigned short locport, int ip4, dk4_er_t *erp ) { struct sockaddr *sa; dk4_socket_t back = INVALID_SOCKET; int res; $? "+ dk4socket_c8_udp_client_for_host \"%s\" %u %u", TR_8STR(remhost), (unsigned)remport, (unsigned)locport if ((NULL != array) && (NULL != remhost) && (0 != remport) && (0 != locport)) { $? ". arguments" res = dk4socket_c8_udp_addresses_numeric( array, remhost, remport, locport, ip4, erp ); if (DK4_SOCKET_RESULT_SUCCESS == res) { $? ". address pair found" sa = (struct sockaddr *)(&(array[1])); back = dk4socket_udp_client_for_addr( sa->sa_family, sa, sizeof(dk4_sockaddr_storage_t), erp ); $? ". back = %d", (int)back } #if TRACE_DEBUG else { $? "! address pair not found" } #endif } else { $? "! arguments" dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); } $? "- dk4socket_c8_udp_client_for_host %d", (int)back return back; }