Tcl Source Code

Check-in [a94b14f5b4]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Don't leak getaddrinfo() results
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: a94b14f5b47ec26bc2142bac7fb5ed04b55da3bf
User & Date: max 2013-11-15 16:13:53
Context
2013-11-16
20:33
Map WSAEWOULDBLOCK to EWOULDBLOCK. Suggested by Reinhard Max. check-in: b34eced180 user: jan.nijtmans tags: trunk
2013-11-15
16:13
Don't leak getaddrinfo() results check-in: a94b14f5b4 user: max tags: trunk
2013-11-12
15:47
Grammar check... check-in: 709893c659 user: dkf tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to win/tclWinSock.c.

1355
1356
1357
1358
1359
1360
1361
1362
1363
1364
1365
1366
1367
1368
1369
1370
1371
1372
	if (asyncConnect) {
	    infoPtr->flags |= SOCKET_ASYNC_CONNECT;
	    infoPtr->selectEvents |= FD_CONNECT;
	}
    }

  error:
    if (addrlist == NULL) {
	freeaddrinfo(addrlist);
    }
    if (myaddrlist == NULL) {
	freeaddrinfo(myaddrlist);
    }

    /*
     * Register for interest in events in the select mask. Note that this
     * automatically places the socket into non-blocking mode.
     */







|


|







1355
1356
1357
1358
1359
1360
1361
1362
1363
1364
1365
1366
1367
1368
1369
1370
1371
1372
	if (asyncConnect) {
	    infoPtr->flags |= SOCKET_ASYNC_CONNECT;
	    infoPtr->selectEvents |= FD_CONNECT;
	}
    }

  error:
    if (addrlist != NULL) {
	freeaddrinfo(addrlist);
    }
    if (myaddrlist != NULL) {
	freeaddrinfo(myaddrlist);
    }

    /*
     * Register for interest in events in the select mask. Note that this
     * automatically places the socket into non-blocking mode.
     */