add license headers to all source files

29 files changed, 145 insertions, 0 deletions

diff --git a/CmdLine.hs b/CmdLine.hs
index 13cb309..5512e75 100644
--- a/CmdLine.hs
+++ b/CmdLine.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 module CmdLine where
 
 import Types
diff --git a/ControlSocket.hs b/ControlSocket.hs
index 782235a..2cf7d86 100644
--- a/ControlSocket.hs
+++ b/ControlSocket.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE DeriveGeneric #-}
 
 -- | debug-me session control unix socket
diff --git a/ControlWindow.hs b/ControlWindow.hs
index fea6351..7d4d2bc 100644
--- a/ControlWindow.hs
+++ b/ControlWindow.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE OverloadedStrings #-}
 
 -- | debug-me session control window
diff --git a/Crypto.hs b/Crypto.hs
index 3c4bf21..d5273ae 100644
--- a/Crypto.hs
+++ b/Crypto.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE OverloadedStrings, RankNTypes, DeriveGeneric #-}
 
 module Crypto where
diff --git a/DotDir.hs b/DotDir.hs
index f6dbb58..6db488b 100644
--- a/DotDir.hs
+++ b/DotDir.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 module DotDir where
 
 import System.Posix
diff --git a/Gpg.hs b/Gpg.hs
index 9ae0638..6995797 100644
--- a/Gpg.hs
+++ b/Gpg.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 module Gpg where
 
 import Val
diff --git a/Gpg/Wot.hs b/Gpg/Wot.hs
index cdf079a..a5d0450 100644
--- a/Gpg/Wot.hs
+++ b/Gpg/Wot.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE DeriveGeneric #-}
 
 -- | Gpg web of trust checking, using wotsap's JSON output
diff --git a/Graphviz.hs b/Graphviz.hs
index 96ad92a..59dba7f 100644
--- a/Graphviz.hs
+++ b/Graphviz.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE OverloadedStrings, FlexibleContexts, FlexibleInstances, TypeSynonymInstances #-}
 
 module Graphviz (graphviz) where
diff --git a/Hash.hs b/Hash.hs
index 43dd597..db4eae8 100644
--- a/Hash.hs
+++ b/Hash.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE FlexibleInstances, OverloadedStrings #-}
 
 module Hash where
diff --git a/JSON.hs b/JSON.hs
index 84ba9d1..c8a6654 100644
--- a/JSON.hs
+++ b/JSON.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 module JSON (
 	module Data.Aeson,
 	Generic,
diff --git a/Log.hs b/Log.hs
index 6f6ce30..1bda5e1 100644
--- a/Log.hs
+++ b/Log.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE DeriveGeneric #-}
 
 module Log where
diff --git a/Memory.hs b/Memory.hs
index 963acf7..9af64cd 100644
--- a/Memory.hs
+++ b/Memory.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 module Memory where
 
 -- | Class of things whose size in memory is known.
diff --git a/PrevActivity.hs b/PrevActivity.hs
index 7c5e808..0836c8b 100644
--- a/PrevActivity.hs
+++ b/PrevActivity.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 module PrevActivity where
 
 import Types
diff --git a/ProtocolBuffers.hs b/ProtocolBuffers.hs
index 51cc552..d5d6a0e 100644
--- a/ProtocolBuffers.hs
+++ b/ProtocolBuffers.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE DeriveGeneric, DataKinds, MultiParamTypeClasses #-}
 {-# LANGUAGE FlexibleContexts, UndecidableInstances #-}
 {-# LANGUAGE OverloadedStrings #-}
diff --git a/Pty.hs b/Pty.hs
index 7b251e7..35910cc 100644
--- a/Pty.hs
+++ b/Pty.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 module Pty (Pty, runWithPty, readPty, writePty, inRawMode) where
 
 import System.Posix
diff --git a/Replay.hs b/Replay.hs
index c2c520e..37df9e1 100644
--- a/Replay.hs
+++ b/Replay.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 module Replay where
 
 import Types
diff --git a/Role/Developer.hs b/Role/Developer.hs
index 6f762a7..b1975c4 100644
--- a/Role/Developer.hs
+++ b/Role/Developer.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE OverloadedStrings #-}
 
 module Role.Developer (
diff --git a/Role/Downloader.hs b/Role/Downloader.hs
index d969df8..e4bdcdf 100644
--- a/Role/Downloader.hs
+++ b/Role/Downloader.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 module Role.Downloader where
 
 import Types
diff --git a/Role/User.hs b/Role/User.hs
index 90d19de..1bc3aa2 100644
--- a/Role/User.hs
+++ b/Role/User.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE OverloadedStrings, TupleSections #-}
 
 module Role.User where
diff --git a/Role/Watcher.hs b/Role/Watcher.hs
index 8ed59d5..bca9e58 100644
--- a/Role/Watcher.hs
+++ b/Role/Watcher.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 module Role.Watcher where
 
 import Types
diff --git a/Server.hs b/Server.hs
index 687636a..f6f5041 100644
--- a/Server.hs
+++ b/Server.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE OverloadedStrings, BangPatterns #-}
 
 module Server where
diff --git a/Session.hs b/Session.hs
index a09a762..9571ed1 100644
--- a/Session.hs
+++ b/Session.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE OverloadedStrings, RankNTypes, FlexibleContexts #-}
 
 module Session where
diff --git a/SessionID.hs b/SessionID.hs
index 170c0e5..0a2f339 100644
--- a/SessionID.hs
+++ b/SessionID.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE OverloadedStrings, DeriveGeneric #-}
 
 module SessionID (
diff --git a/Setup.hs b/Setup.hs
index 80bfc03..7adeac1 100644
--- a/Setup.hs
+++ b/Setup.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# OPTIONS_GHC -fno-warn-tabs #-}
 
 import Distribution.Simple
diff --git a/Types.hs b/Types.hs
index c0eb7dd..233a7de 100644
--- a/Types.hs
+++ b/Types.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE DeriveGeneric, FlexibleInstances, FlexibleContexts #-}
 
 {- | Main types for debug-me
diff --git a/Val.hs b/Val.hs
index d307dde..c395a95 100644
--- a/Val.hs
+++ b/Val.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE GeneralizedNewtypeDeriving, DeriveGeneric, FlexibleInstances, OverloadedStrings #-}
 
 module Val where
diff --git a/VirtualTerminal.hs b/VirtualTerminal.hs
index 6c7ef75..009f887 100644
--- a/VirtualTerminal.hs
+++ b/VirtualTerminal.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 module VirtualTerminal where
 
 import System.FilePath
diff --git a/WebSockets.hs b/WebSockets.hs
index 17b0170..e0eac18 100644
--- a/WebSockets.hs
+++ b/WebSockets.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 {-# LANGUAGE OverloadedStrings, DeriveGeneric, GeneralizedNewtypeDeriving #-}
 {-# LANGUAGE FlexibleContexts, FlexibleInstances, ScopedTypeVariables #-}
 
diff --git a/debug-me.hs b/debug-me.hs
index dc40fc3..c9bbd22 100644
--- a/debug-me.hs
+++ b/debug-me.hs
@@ -1,3 +1,8 @@
+{- Copyright 2017 Joey Hess <id@joeyh.name>
+ -
+ - Licensed under the GNU AGPL version 3 or higher.
+ -}
+
 module Main where
 
 import CmdLine