Added info activeSocket().

libcurl.mod/common.bmx

@@ -81,6 +81,7 @@ Extern
 	Function bmx_curl_easy_getinfo_double:Int(handle:Byte Ptr, option:Int, value:Double Ptr)
 	Function bmx_curl_easy_getinfo_obj:Object(handle:Byte Ptr, option:Int, error:Int Ptr)
 	Function bmx_curl_easy_getinfo_slist:Int(handle:Byte Ptr, option:Int, slist:SCurlSlist Ptr)
+	Function bmx_curl_easy_getinfo_long:Int(handle:Byte Ptr, option:Int, value:Long Ptr)
 	
 	Function bmx_curl_multiselect:Int(handle:Byte Ptr, timeout:Double)
 	

libcurl.mod/curlmain.bmx

@@ -944,7 +944,27 @@ Type TCurlInfo
 	
 		Return this
 	End Function
-	
+
+?not win32
+	Method activeSocket:Int()
+		Local value:Int		
+		error = bmx_curl_easy_getinfo_int(easyHandlePtr, CURLINFO_ACTIVESOCKET, Varptr value)
+		Return value
+	End Method
+?win32 and ptr32
+	Method activeSocket:Int()
+		Local value:Int		
+		error = bmx_curl_easy_getinfo_int(easyHandlePtr, CURLINFO_ACTIVESOCKET, Varptr value)
+		Return value
+	End Method
+?win32 and ptr64
+	Method activeSocket:Long()
+		Local value:Long		
+		error = bmx_curl_easy_getinfo_long(easyHandlePtr, CURLINFO_ACTIVESOCKET, Varptr value)
+		Return value
+	End Method
+?
+
 	Rem
 	bbdoc: The last used effective URL.
 	End Rem

libcurl.mod/glue.c

@@ -95,6 +95,10 @@ CURLcode bmx_curl_easy_getinfo_double(CURL *curl, CURLINFO info, double * value)
 	return curl_easy_getinfo(curl, info, value);
 }
 
+CURLcode bmx_curl_easy_getinfo_long(CURL *curl, CURLINFO info, BBInt64 * value) {
+	return curl_easy_getinfo(curl, info, value);
+}
+
 char * bmx_curl_easy_getinfo_obj(CURL * curl, CURLINFO info, CURLcode * error) {
 	char * priv = NULL;
 	*error = curl_easy_getinfo(curl, info, priv);