1 -- mod_http_upload

     1 -- mod_http_upload

     2 --

     2 --

     3 -- Copyright (C) 2015 Kim Alvefur

     3 -- Copyright (C) 2015 Kim Alvefur

     4 --

     4 --

     5 -- This file is MIT/X11 licensed.

     5 -- This file is MIT/X11 licensed.

     7 -- Implementation of HTTP Upload file transfer mechanism used by Conversations

     7 -- Implementation of HTTP Upload file transfer mechanism used by Conversations

     8 --

     8 --

     9 

     9 

    10 -- imports

    10 -- imports

    11 local st = require"util.stanza";

    11 local st = require"util.stanza";

   128 

   128 

   129 local function send_response_sans_body(response, body)

   129 local function send_response_sans_body(response, body)

   130 	if response.finished then return; end

   130 	if response.finished then return; end

   131 	response.finished = true;

   131 	response.finished = true;

   132 	response.conn._http_open_response = nil;

   132 	response.conn._http_open_response = nil;

   134 	local status_line = "HTTP/"..response.request.httpversion.." "..(response.status or codes[response.status_code]);

   134 	local status_line = "HTTP/"..response.request.httpversion.." "..(response.status or codes[response.status_code]);

   135 	local headers = response.headers;

   135 	local headers = response.headers;

   136 	body = body or response.body or "";

   136 	body = body or response.body or "";

   137 	headers.content_length = #body;

   137 	headers.content_length = #body;

   138 

   138