Adds a test for the disposal of old connections from the connection pool

Author: mschoenlaub

tests/test-mongoc-client-pool.c

@@ -1,4 +1,6 @@
 #include <mongoc.h>
+#include "mongoc-array-private.h"
+
 
 #include "TestSuite.h"
 
@@ -37,10 +39,44 @@ test_mongoc_client_pool_try_pop (void)
    mongoc_client_pool_destroy(pool);
 }
 
+static void
+test_mongoc_client_pool_min_size_dispose (void)
+{
+   mongoc_client_pool_t *pool;
+   mongoc_client_t *client;
+   mongoc_uri_t *uri;
+   mongoc_array_t conns;
+   int i;
+
+   _mongoc_array_init(&conns, sizeof client);
+
+   uri = mongoc_uri_new("mongodb://127.0.0.1?maxpoolsize=10&minpoolsize=3");
+   pool = mongoc_client_pool_new(uri);
+
+   for (i = 0; i < 10; i++) {
+      client = mongoc_client_pool_pop(pool);
+      assert(client);
+      _mongoc_array_append_val(&conns, client);
+      assert(mongoc_client_pool_get_size(pool) == i+1);
+   }
+   
+   for (i = 0; i < 10; i++) {
+      client = _mongoc_array_index(&conns,mongoc_client_t *, i);
+      assert(client);
+      mongoc_client_pool_push(pool, client);
+   }
+
+   assert(mongoc_client_pool_get_size(pool) == 3);
+   _mongoc_array_clear(&conns);
+   _mongoc_array_destroy(&conns);
+   mongoc_uri_destroy(uri);
+   mongoc_client_pool_destroy(pool);
+}
 
 void
 test_client_pool_install (TestSuite *suite)
 {
    TestSuite_Add (suite, "/ClientPool/basic", test_mongoc_client_pool_basic);
    TestSuite_Add (suite, "/ClientPool/try_pop", test_mongoc_client_pool_try_pop);
+   TestSuite_Add (suite, "/ClientPool/min_size_dispose", test_mongoc_client_pool_min_size_dispose);
 }