hang up connection after relaying
Seems that git upload-pack outputs a "ONCDN " that is not read by the remote git receive-pack. This fixes: [2016-12-09 17:08:32.77159731] P2P > ERROR protocol parse error: "ONCDN "
This commit is contained in:
parent
b65780778a
commit
fa1b3a19f9
1 changed files with 4 additions and 1 deletions
|
@ -387,7 +387,10 @@ serveAuthed myuuid = void $ serverLoop handler
|
||||||
return ServerContinue
|
return ServerContinue
|
||||||
handler (CONNECT service) = do
|
handler (CONNECT service) = do
|
||||||
net $ relayService service
|
net $ relayService service
|
||||||
return ServerContinue
|
-- After connecting to git, there may be unconsumed data
|
||||||
|
-- from the git processes hanging around (even if they
|
||||||
|
-- exited successfully), so stop serving this connection.
|
||||||
|
return $ ServerGot ()
|
||||||
handler NOTIFYCHANGE = do
|
handler NOTIFYCHANGE = do
|
||||||
refs <- local waitRefChange
|
refs <- local waitRefChange
|
||||||
net $ sendMessage (CHANGED refs)
|
net $ sendMessage (CHANGED refs)
|
||||||
|
|
Loading…
Reference in a new issue