Add compatibility URLs for Pipermail

1 files changed, 112 insertions, 0 deletions

diff --git a/hyperkitty/views/compat.py b/hyperkitty/views/compat.py
new file mode 100644
index 0000000..dea2174
--- /dev/null
+++ b/hyperkitty/views/compat.py
@@ -0,0 +1,112 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 1998-2012 by the Free Software Foundation, Inc.
+#
+# This file is part of HyperKitty.
+#
+# HyperKitty is free software: you can redistribute it and/or modify it under
+# the terms of the GNU General Public License as published by the Free
+# Software Foundation, either version 3 of the License, or (at your option)
+# any later version.
+#
+# HyperKitty 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 General Public License for
+# more details.
+#
+# You should have received a copy of the GNU General Public License along with
+# HyperKitty.  If not, see <http://www.gnu.org/licenses/>.
+#
+
+from __future__ import with_statement
+
+import os
+import mailbox
+import datetime
+import tempfile
+import gzip
+from cStringIO import StringIO
+
+from django.core.urlresolvers import reverse
+from django.http import HttpResponse, HttpResponseRedirect, Http404
+
+from hyperkitty.lib import get_store
+from hyperkitty.lib.compat import get_list_by_name, month_name_to_num
+
+
+def summary(request, list_name=None):
+    if list_name is None:
+        return HttpResponseRedirect(reverse('root'))
+    store = get_store(request)
+    mlist = get_list_by_name(list_name, store, request)
+    if mlist is None:
+        raise Http404("No archived mailing-list by that name.")
+    url = reverse('list_overview', kwargs={'mlist_fqdn': mlist.name})
+    #return HttpResponse(request.build_absolute_uri(url))
+    return HttpResponseRedirect(url)
+
+
+def arch_month(request, list_name, year, month_name, summary_type="thread"):
+    store = get_store(request)
+    mlist = get_list_by_name(list_name, store, request)
+    if mlist is None:
+        raise Http404("No archived mailing-list by that name.")
+    url = reverse('archives_with_month', kwargs={
+            'mlist_fqdn': mlist.name,
+            'year': year,
+            'month': str(month_name_to_num(month_name)).rjust(2, "0"),
+            })
+    #return HttpResponse(request.build_absolute_uri(url))
+    return HttpResponseRedirect(url)
+
+
+def arch_month_mbox(request, list_name, year, month_name):
+    store = get_store(request)
+    mlist = get_list_by_name(list_name, store, request)
+    if mlist is None:
+        raise Http404("No archived mailing-list by that name.")
+    month = month_name_to_num(month_name)
+    year = int(year)
+    begin_date = datetime.datetime(year, month, 1)
+    if month != 12:
+        end_month = month + 1
+    else:
+        end_month = 1
+    end_date = datetime.datetime(year, end_month, 1)
+    messages = store.get_messages(mlist.name, start=begin_date, end=end_date)
+    messages.reverse() # they are sorted recent first by default
+    mboxfile, mboxfilepath = tempfile.mkstemp(prefix="hyperkitty-",
+                                              suffix=".mbox.gz")
+    os.close(mboxfile)
+    mbox = mailbox.mbox(mboxfilepath)
+    for message in messages:
+        mbox.add(message.full)
+    mbox.close()
+    content = StringIO()
+    zipped_content = gzip.GzipFile(fileobj=content)
+    with gzip.GzipFile(fileobj=content, mode="wb") as zipped_content:
+        with open(mboxfilepath, "rb") as mboxfile:
+            zipped_content.write(mboxfile.read())
+    response = HttpResponse(content.getvalue())
+    content.close()
+    response['Content-Type'] = "application/mbox+gz"
+    response['Content-Disposition'] = 'attachment; filename=%d-%s.txt.gz' \
+            % (year, month_name)
+    response['Content-Length'] = len(response.content)
+    os.remove(mboxfilepath)
+    return response
+
+
+def message(request, list_name, year, month_name, msg_num):
+    store = get_store(request)
+    mlist = get_list_by_name(list_name, store, request)
+    if mlist is None:
+        raise Http404("No archived mailing-list by that name.")
+    message = store.get_message_by_number(mlist.name, int(msg_num))
+    if message is None:
+        raise Http404("No such message in this mailing-list.")
+    url = reverse('message_index', kwargs={
+            'mlist_fqdn': mlist.name,
+            'hashid': message.message_id_hash,
+            })
+    #return HttpResponse(request.build_absolute_uri(url))
+    return HttpResponseRedirect(url)