X-Git-Url: https://git.distorted.org.uk/u/mdw/putty/blobdiff_plain/e0c472030d01e6ec631e7996f793466a040515f7..d50c2df3a49fc88945948331821b4eb09e2919f8:/mac/otnet.c?ds=sidebyside diff --git a/mac/otnet.c b/mac/otnet.c index 282141f5..809906b3 100644 --- a/mac/otnet.c +++ b/mac/otnet.c @@ -2,6 +2,11 @@ * Macintosh OpenTransport networking abstraction */ +#if TARGET_API_MAC_CARBON +#define OTCARBONAPPLICATION 1 +#endif + +#include /* Needed by OpenTransportInternet.h */ #include #include @@ -74,26 +79,28 @@ void ot_cleanup(void) CloseOpenTransport(); } -SockAddr ot_namelookup(char *host, char **canonicalname) +SockAddr ot_namelookup(char const *host, char **canonicalname) { - SockAddr ret = smalloc(sizeof(struct SockAddr_tag)); + SockAddr ret = snew(struct SockAddr_tag); char *realhost; - - ret->error = OTInetStringToAddress(ot.inetsvc, host, &ret->hostinfo); + + /* Casting away const -- hope OTInetStringToAddress is sensible */ + ret->error = OTInetStringToAddress(ot.inetsvc, (char *)host, + &ret->hostinfo); ret->resolved = TRUE; if (ret->error == kOTNoError) realhost = ret->hostinfo.name; else realhost = ""; - *canonicalname = smalloc(1+strlen(realhost)); + *canonicalname = snewn(1+strlen(realhost), char); strcpy(*canonicalname, realhost); return ret; } -SockAddr ot_nonamelookup(char *host) +SockAddr ot_nonamelookup(char const *host) { - SockAddr ret = smalloc(sizeof(struct SockAddr_tag)); + SockAddr ret = snew(struct SockAddr_tag); ret->resolved = FALSE; ret->error = kOTNoError; @@ -198,7 +205,7 @@ Socket ot_register(void *sock, Plug plug) Actual_Socket ret; - ret = smalloc(sizeof(struct Socket_tag)); + ret = snew(struct Socket_tag); ret->fn = &fn_table; ret->error = kOTNoError; ret->plug = plug; @@ -247,7 +254,7 @@ Socket ot_new(SockAddr addr, int port, int privport, int oobinline, InetAddress dest; TCall connectCall; - ret = smalloc(sizeof(struct Socket_tag)); + ret = snew(struct Socket_tag); ret->fn = &fn_table; ret->error = kOTNoError; ret->plug = plug;