From e847cfe4bc9a111c6b5d0a2575c4f814ff2046eb Mon Sep 17 00:00:00 2001
From: John Berthels <john_berthels@trendmicro.co.uk>
Date: Wed, 19 Jun 2013 15:25:55 +0100
Subject: [PATCH] fix infinite loop in coroae/psgi

Perl PSGI app infinite loops since f20213ff10d1980a97c5c72c2e56044a05f21f8c

Looking at that change, other loop termination conditions are '<= UWSGI_OK'.
Using gdb to inspect the app while looping shows thats ->request is returning
UWSGI_OK in this case. However, the numeric value of this is zero, so we
never exit the for(;;) loop.

Cargo culting loop escape conditions from core/async.c (or gevent/gevent.c)
fixes the inf loop for psgi/coroae.
---
 plugins/coroae/coroae.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/plugins/coroae/coroae.c b/plugins/coroae/coroae.c
index 6d250cae..6832aaa4 100644
--- a/plugins/coroae/coroae.c
+++ b/plugins/coroae/coroae.c
@@ -161,7 +161,7 @@ request:
 #endif
 
         for(;;) {
-                if (uwsgi.p[wsgi_req->uh->modifier1]->request(wsgi_req)) {
+                if (uwsgi.p[wsgi_req->uh->modifier1]->request(wsgi_req) <= UWSGI_OK) {
                         goto end;
                 }
                 wsgi_req->switches++;