Fix low-probability leaks of PGresult objects in the backend.

We had three occurrences of essentially the same coding pattern
wherein we tried to retrieve a query result from a libpq connection
without blocking.  In the case where PQconsumeInput failed (typically
indicating a lost connection), all three loops simply gave up and
returned, forgetting to clear any previously-collected PGresult
object.  Since those are malloc'd not palloc'd, the oversight results
in a process-lifespan memory leak.

One instance, in libpqwalreceiver, is of little significance because
the walreceiver process would just quit anyway if its connection fails.
But we might as well fix it.

The other two instances, in postgres_fdw, are somewhat more worrisome
because at least in principle the scenario could be repeated, allowing
the amount of memory leaked to build up to something worth worrying
about.  Moreover, in these cases the loops contain CHECK_FOR_INTERRUPTS
calls, as well as other calls that could potentially elog(ERROR),
providing another way to exit without having cleared the PGresult.
Here we need to add PG_TRY logic similar to what exists in quite a
few other places in postgres_fdw.

Coverity noted the libpqwalreceiver bug; I found the other two cases
by checking all calls of PQconsumeInput.

Back-patch to all supported versions as appropriate (9.2 lacks
postgres_fdw, so this is really quite unexciting for that branch).

Discussion: https://postgr.es/m/22620.1497486981@sss.pgh.pa.us

diff --git a/contrib/postgres_fdw/connection.c b/contrib/postgres_fdw/connection.c
index b9074d64a7f415978bf57c255dadf280cd8d221b..719cad552c588d77c43c01a7d988ee0d9c91b34e 100644 (file)
--- a/contrib/postgres_fdw/connection.c
+++ b/contrib/postgres_fdw/connection.c
@@ -498,7 +498,7 @@ pgfdw_exec_query(PGconn *conn, const char *query)
  *
  * This function offers quick responsiveness by checking for any interruptions.
  *
- * This function emulates the PQexec()'s behavior of returning the last result
+ * This function emulates PQexec()'s behavior of returning the last result
  * when there are many.
  *
  * Caller is responsible for the error handling on the result.
@@ -506,40 +506,50 @@ pgfdw_exec_query(PGconn *conn, const char *query)
 PGresult *
 pgfdw_get_result(PGconn *conn, const char *query)
 {
-   PGresult   *last_res = NULL;
+   PGresult   *volatile last_res = NULL;
 
-   for (;;)
+   /* In what follows, do not leak any PGresults on an error. */
+   PG_TRY();
    {
-       PGresult *res;
-
-       while (PQisBusy(conn))
+       for (;;)
        {
-           int     wc;
+           PGresult   *res;
 
-           /* Sleep until there's something to do */
-           wc = WaitLatchOrSocket(&MyProc->procLatch,
-                                  WL_LATCH_SET | WL_SOCKET_READABLE,
-                                  PQsocket(conn),
-                                  -1L);
-           ResetLatch(&MyProc->procLatch);
+           while (PQisBusy(conn))
+           {
+               int         wc;
 
-           CHECK_FOR_INTERRUPTS();
+               /* Sleep until there's something to do */
+               wc = WaitLatchOrSocket(&MyProc->procLatch,
+                                      WL_LATCH_SET | WL_SOCKET_READABLE,
+                                      PQsocket(conn),
+                                      -1L);
+               ResetLatch(&MyProc->procLatch);
 
-           /* Data available in socket */
-           if (wc & WL_SOCKET_READABLE)
-           {
-               if (!PQconsumeInput(conn))
-                   pgfdw_report_error(ERROR, NULL, conn, false, query);
+               CHECK_FOR_INTERRUPTS();
+
+               /* Data available in socket? */
+               if (wc & WL_SOCKET_READABLE)
+               {
+                   if (!PQconsumeInput(conn))
+                       pgfdw_report_error(ERROR, NULL, conn, false, query);
+               }
            }
-       }
 
-       res = PQgetResult(conn);
-       if (res == NULL)
-           break;              /* query is complete */
+           res = PQgetResult(conn);
+           if (res == NULL)
+               break;          /* query is complete */
 
+           PQclear(last_res);
+           last_res = res;
+       }
+   }
+   PG_CATCH();
+   {
        PQclear(last_res);
-       last_res = res;
+       PG_RE_THROW();
    }
+   PG_END_TRY();
 
    return last_res;
 }
@@ -1007,6 +1017,7 @@ pgfdw_exec_cleanup_query(PGconn *conn, const char *query, bool ignore_errors)
        pgfdw_report_error(WARNING, result, conn, true, query);
        return ignore_errors;
    }
+   PQclear(result);
 
    return true;
 }
@@ -1029,56 +1040,75 @@ pgfdw_exec_cleanup_query(PGconn *conn, const char *query, bool ignore_errors)
 static bool
 pgfdw_get_cleanup_result(PGconn *conn, TimestampTz endtime, PGresult **result)
 {
-   PGresult   *last_res = NULL;
+   volatile bool timed_out = false;
+   PGresult   *volatile last_res = NULL;
 
-   for (;;)
+   /* In what follows, do not leak any PGresults on an error. */
+   PG_TRY();
    {
-       PGresult   *res;
-
-       while (PQisBusy(conn))
+       for (;;)
        {
-           int         wc;
-           TimestampTz now = GetCurrentTimestamp();
-           long        secs;
-           int         microsecs;
-           long        cur_timeout;
-
-           /* If timeout has expired, give up, else get sleep time. */
-           if (now >= endtime)
-               return true;
-           TimestampDifference(now, endtime, &secs, µsecs);
-
-           /* To protect against clock skew, limit sleep to one minute. */
-           cur_timeout = Min(60000, secs * USECS_PER_SEC + microsecs);
-
-           /* Sleep until there's something to do */
-           wc = WaitLatchOrSocket(&MyProc->procLatch,
+           PGresult   *res;
+
+           while (PQisBusy(conn))
+           {
+               int         wc;
+               TimestampTz now = GetCurrentTimestamp();
+               long        secs;
+               int         microsecs;
+               long        cur_timeout;
+
+               /* If timeout has expired, give up, else get sleep time. */
+               if (now >= endtime)
+               {
+                   timed_out = true;
+                   goto exit;
+               }
+               TimestampDifference(now, endtime, &secs, µsecs);
+
+               /* To protect against clock skew, limit sleep to one minute. */
+               cur_timeout = Min(60000, secs * USECS_PER_SEC + microsecs);
+
+               /* Sleep until there's something to do */
+               wc = WaitLatchOrSocket(&MyProc->procLatch,
                              WL_LATCH_SET | WL_SOCKET_READABLE | WL_TIMEOUT,
-                                  PQsocket(conn),
-                                  cur_timeout);
-           ResetLatch(&MyProc->procLatch);
+                                      PQsocket(conn),
+                                      cur_timeout);
+               ResetLatch(&MyProc->procLatch);
 
-           CHECK_FOR_INTERRUPTS();
+               CHECK_FOR_INTERRUPTS();
 
-           /* Data available in socket */
-           if (wc & WL_SOCKET_READABLE)
-           {
-               if (!PQconsumeInput(conn))
+               /* Data available in socket? */
+               if (wc & WL_SOCKET_READABLE)
                {
-                   *result = NULL;
-                   return false;
+                   if (!PQconsumeInput(conn))
+                   {
+                       /* connection trouble; treat the same as a timeout */
+                       timed_out = true;
+                       goto exit;
+                   }
                }
            }
-       }
 
-       res = PQgetResult(conn);
-       if (res == NULL)
-           break;              /* query is complete */
+           res = PQgetResult(conn);
+           if (res == NULL)
+               break;          /* query is complete */
 
+           PQclear(last_res);
+           last_res = res;
+       }
+exit:  ;
+   }
+   PG_CATCH();
+   {
        PQclear(last_res);
-       last_res = res;
+       PG_RE_THROW();
    }
+   PG_END_TRY();
 
-   *result = last_res;
-   return false;
+   if (timed_out)
+       PQclear(last_res);
+   else
+       *result = last_res;
+   return timed_out;
 }

diff --git a/src/backend/replication/libpqwalreceiver/libpqwalreceiver.c b/src/backend/replication/libpqwalreceiver/libpqwalreceiver.c
index 2b0b292f666f33091f13e18deecb2d1f8c803063..774417b4675e575902dff4ece5be5400e8cb2f7c 100644 (file)
--- a/src/backend/replication/libpqwalreceiver/libpqwalreceiver.c
+++ b/src/backend/replication/libpqwalreceiver/libpqwalreceiver.c
@@ -410,14 +410,20 @@ libpqrcv_PQexec(const char *query)
             */
            if (!libpq_select(-1))
                continue;       /* interrupted */
+
+           /* Consume whatever data is available from the socket */
            if (PQconsumeInput(streamConn) == 0)
-               return NULL;    /* trouble */
+           {
+               /* trouble; drop whatever we had and return NULL */
+               PQclear(lastResult);
+               return NULL;
+           }
        }
 
        /*
-        * Emulate the PQexec()'s behavior of returning the last result when
-        * there are many. Since walsender will never generate multiple
-        * results, we skip the concatenation of error messages.
+        * Emulate PQexec()'s behavior of returning the last result when there
+        * are many.  Since walsender will never generate multiple results, we
+        * skip the concatenation of error messages.
         */
        result = PQgetResult(streamConn);
        if (result == NULL)