# HG changeset patch
# User Florian Zeitz <florob@babelmonkeys.de>
# Date 1358006139 -3600
# Node ID cc9d460aa779fa6cbbdb37f2b81b6c5f6c237a6c
# Parent  6d34ed9fce69ed89ac00f6bb1030302a53330022
util.http: New module for HTTP helper functions

diff -r 6d34ed9fce69 -r cc9d460aa779 util/http.lua
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/util/http.lua	Sat Jan 12 16:55:39 2013 +0100
@@ -0,0 +1,15 @@
+-- Prosody IM
+-- Copyright (C) 2013 Florian Zeitz
+--
+-- This project is MIT/X11 licensed. Please see the
+-- COPYING file in the source package for more information.
+--
+
+local http = {};
+
+function http.contains_token(field, token)
+	field = ","..field:gsub("[ \t]", ""):lower()..",";
+	return field:find(","..token:lower()..",", 1, true) ~= nil;
+end
+
+return http;