Skip to content
This repository
tag: v331
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

file 32 lines (29 sloc) 1.318 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31
%% Request lines :

%
% Copyright © 2011 MLstate
%
% This file is part of OPA.
%
% OPA is free software: you can redistribute it and/or modify it under the
% terms of the GNU Affero General Public License, version 3, as published by
% the Free Software Foundation.
%
% OPA is distributed in the hope that it will be useful, but WITHOUT ANY
% WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
% FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for
% more details.
%
% You should have received a copy of the GNU Affero General Public License
% along with OPA. If not, see <http://www.gnu.org/licenses/>.
%
-define Get (uri, v) = "GET " uri " HTTP/" v "\r\n"
-define Head (uri, v) = "HEAD " uri " HTTP/" v "\r\n"
-define Post (uri, v) = "POST " uri " HTTP/" v "\r\n"
-define Put (uri, v) = "PUT " uri " HTTP/" v "\r\n"
-define Del (uri, v) = "DELETE " uri " HTTP/" v "\r\n"
-define Trace (uri, v) = "TRACE " uri " HTTP/" v "\r\n"
-define Conn (uri, v) = "CONNECT " uri " HTTP/" v "\r\n"
-define Opts (uri, v) = "OPTIONS " uri " HTTP/" v "\r\n"

%%% Reponse <- Status line (header crlf)* crlf (Message body)?
%% Status-Line, v) = HTTP-Version SP Status-Code SP Reason-Phrase CRLF :
-define Sl (vs, code:int, reason) = "HTTP/" vs " " code " " reason "\r\n"
Something went wrong with that request. Please try again.