{"header":{"message":"Postgres & auth are beginning to function.","description":null,"timestamp":"2015-02-16T00:24:30Z","authors":[{"email":"kris.nuttycombe@gmail.com","name":"Kris Nuttycombe"}]},"hash":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC","authors":[],"deps":{"hashes":[["PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC","Postgres & auth are beginning to function."],["AA",null],["I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC","Require project permissions for access to most data."],["Z7KS5XHHC6PAMTVBHXY7KUSS3BWAOU6FSYIITUCFOOJZU4OUJHBAC","Very WIP. Wow."],["TNR3TEHKVADAEZSTOD2XLSUTSW5AWST2YUW4CWK5KE7DSC6XHZNAC","Switch to Postgres + snaplet arch compiles."],["IZEVQF627FA7VV25KJAWYWGGC35LZUUBBQRPN5ZAINTQLPEDRTEAC","Work in progress replacing sqlite with postgres."],["BROSTG5KP3NUNLSYPVQID254TE47E5RKQAKLPIY7PGWETE6JNMTAC","Beginning of modularization of server."],["BXGLKYRXO2O4NRM3BLNWQ7AWVPQXAMFS57MFYHJNOZZEZZW5BH6AC","Added primitive user registration handler."],["GKGVYBZGPJXO7N7GLHLRNYQPXFHBQSNQN53OKRFCXLQEYDTC5I4QC","Added JSON serialization to TimeLog"],["NVOCQVASZWTKQJG7GPH7KHKZZR7NUG4WLV5YY4KAIRPCJRWCZPIAC","Initial failing tests."],["VJPT6HDRMJAJD5PT3VOYJYW43ISKLICEHLSDWSROX2XZWO2OFZPQC","Fix remaining type errors after addition of login handler."],["ADMKQQGCGVSHHIMVQ4XFRDCG544SBJCYALSKZV45CQQBZ4ACUH2AC","Initial empty Snap project."],["OBFPJS2GHO2PEHBHGEHKIUOUAFIQHPIZXEVD2YIE3ZIE2PVMH5VAC","Project successfully builds and tests under nix."],["5W5M56VJFJEBXMGBVKGCKPHOEMVTKUOQMLPJP7VNDQLTYNJXXLHQC","Move library code to 'lib'"],["64C6AWH66FDKU6UE6Z6JPX2J2GBM2JOPTH2GL6LHKAIUBGNGDZ5AC","Rename Ananke -> Quixotic, project reboot."],["WO2MINIF4TXOHWSE7JWXRZYN64XRVLYIRFMF4SMPSOXKA2V77KMQC","Auctions now compile!"],["HE3JTXO37O4MOMWPZ4BRBHP53KBPZDG3PCSUCVNOKIS7IY26OCIAC","Added client call to payouts."],["4IQVQL4TS35GL2GYZJG254TKJLL5EHMRSFT77Z4VTRZIG2TMBM3QC","Added client for payouts endpoint."],["AXKKXBWN4EMUOLV43WN52JSKJPBV7TLSGLNJW5EZXHSJNKCYUWOQC","Initial attempt at writing down my ideas for a company based on trust."]],"deps":["I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC"],"known":["NVOCQVASZWTKQJG7GPH7KHKZZR7NUG4WLV5YY4KAIRPCJRWCZPIAC","GKGVYBZGPJXO7N7GLHLRNYQPXFHBQSNQN53OKRFCXLQEYDTC5I4QC","IZEVQF627FA7VV25KJAWYWGGC35LZUUBBQRPN5ZAINTQLPEDRTEAC","TNR3TEHKVADAEZSTOD2XLSUTSW5AWST2YUW4CWK5KE7DSC6XHZNAC","BROSTG5KP3NUNLSYPVQID254TE47E5RKQAKLPIY7PGWETE6JNMTAC","VJPT6HDRMJAJD5PT3VOYJYW43ISKLICEHLSDWSROX2XZWO2OFZPQC","BXGLKYRXO2O4NRM3BLNWQ7AWVPQXAMFS57MFYHJNOZZEZZW5BH6AC","Z7KS5XHHC6PAMTVBHXY7KUSS3BWAOU6FSYIITUCFOOJZU4OUJHBAC"]},"hunks":[{"Edit":{"inode":{"change":12,"pos":135},"path":".gitignore","line":12,"atom":{"NewVertex":{"up_context":[{"change":13,"pos":29}],"down_context":[],"flag":"BLOCK","start":1,"end":49,"inode":{"change":12,"pos":135}}},"contents":[{"Add":{"text":"local","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:6"}},{"Add":{"text":"stable","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:13"}},{"Add":{"text":"snaplets","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:22"}},{"Add":{"text":"regtest.conf","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:35"}},{"Add":{"text":"site_key.txt","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:48"}}]}},{"Replacement":{"inode":{"change":3,"pos":456},"path":"lib/Quixotic/Database/PostgreSQL.hs","line":152,"ins":{"up_context":[{"change":3,"pos":4341}],"down_context":[{"change":3,"pos":4444}],"flag":"BLOCK","start":54,"end":159,"inode":{"change":3,"pos":456}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":4341},"to":{"change":3,"start":4341,"end":4444},"introduced_by":3}],"inode":{"change":3,"pos":456}},"ins_contents":[{"Add":{"text":" \"INSERT INTO bids (auction_id, bidder_id, bid_seconds, bid_amount, bid_time) values (?, ?, ?, ?, ?)\"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:158"}}],"del_contents":[{"Del":{"text":" \"INSERT INTO bids (auction_id, user_id, bid_seconds, bid_amount, bid_time) values (?, ?, ?, ?, ?)\"","pos":"IZEVQF627FA7VV25KJAWYWGGC35LZUUBBQRPN5ZAINTQLPEDRTEAC:4443"}}]}},{"Replacement":{"inode":{"change":3,"pos":456},"path":"lib/Quixotic/Database/PostgreSQL.hs","line":172,"ins":{"up_context":[{"change":3,"pos":4978}],"down_context":[{"change":3,"pos":339}],"flag":"BLOCK","start":160,"end":240,"inode":{"change":3,"pos":456}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":4978},"to":{"change":3,"start":4978,"end":5055},"introduced_by":3}],"inode":{"change":3,"pos":456}},"ins_contents":[{"Add":{"text":" \"INSERT INTO users (handle, btc_addr, email) VALUES (?, ?, ?) RETURNING id\"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:239"}}],"del_contents":[{"Del":{"text":" \"INSERT INTO users (handle, btc_addr, email) VALUES (?, ?) RETURNING id\"","pos":"IZEVQF627FA7VV25KJAWYWGGC35LZUUBBQRPN5ZAINTQLPEDRTEAC:5054"}}]}},{"FileAdd":{"meta":{"basename":"Util","metadata":576},"context":[{"change":14,"pos":18}],"contents":[]}},{"FileAdd":{"meta":{"basename":"Http.hs","metadata":0},"context":[{"change":0,"pos":242}],"contents":[{"Add":{"text":"module Quixotic.Util.Http where","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:292"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:293"}},{"Add":{"text":"import ClassyPrelude ","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:315"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:316"}},{"Add":{"text":"import Data.ByteString (split)","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:347"}},{"Add":{"text":"import Data.Attoparsec.ByteString ","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:382"}},{"Add":{"text":"import qualified Data.ByteString.Base64 as B64","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:429"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:430"}},{"Add":{"text":"type AuthHeader = (Text, ByteString)","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:467"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:468"}},{"Add":{"text":"authHeaderParser :: Parser AuthHeader","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:506"}},{"Add":{"text":"authHeaderParser = do","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:528"}},{"Add":{"text":" let isBase64Char w = (w >= 47 && w <= 57 ) ||","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:576"}},{"Add":{"text":" (w >= 64 && w <= 90 ) ||","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:624"}},{"Add":{"text":" (w >= 97 && w <= 122) ||","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:672"}},{"Add":{"text":" (w == 43 || w == 61 )","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:717"}},{"Add":{"text":" b64 <- string \"Basic \" *> takeWhile1 isBase64Char ","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:774"}},{"Add":{"text":" decoded <- either fail pure $ B64.decode b64","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:821"}},{"Add":{"text":" case split 58 decoded of","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:848"}},{"Add":{"text":" (uname : pwd : []) -> pure $ (decodeUtf8 uname, pwd)","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:905"}},{"Add":{"text":" _ -> fail \"Could not unpack auth header into username and password components\"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:988"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:989"}}]}},{"Replacement":{"inode":{"change":3,"pos":2457},"path":"lib/Quixotic.hs","line":40,"ins":{"up_context":[{"change":3,"pos":3223}],"down_context":[{"change":3,"pos":3251}],"flag":"BLOCK","start":1024,"end":1060,"inode":{"change":3,"pos":2457}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3223},"to":{"change":3,"start":3223,"end":3251},"introduced_by":3}],"inode":{"change":3,"pos":2457}},"ins_contents":[{"Add":{"text":" { _invitationProject :: ProjectId","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1059"}}],"del_contents":[{"Del":{"text":" { _projectId :: ProjectId","pos":"Z7KS5XHHC6PAMTVBHXY7KUSS3BWAOU6FSYIITUCFOOJZU4OUJHBAC:3250"}}]}},{"Edit":{"inode":{"change":15,"pos":1},"path":"quixotic.cabal","line":30,"atom":{"NewVertex":{"up_context":[{"change":15,"pos":751}],"down_context":[{"change":16,"pos":1584}],"flag":"BLOCK","start":1062,"end":1103,"inode":{"change":15,"pos":1}}},"contents":[{"Add":{"text":" Quixotic.Util.Http","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1102"}}]}},{"Edit":{"inode":{"change":15,"pos":1},"path":"quixotic.cabal","line":35,"atom":{"NewVertex":{"up_context":[{"change":16,"pos":1742}],"down_context":[{"change":13,"pos":3072}],"flag":"BLOCK","start":1104,"end":1143,"inode":{"change":15,"pos":1}}},"contents":[{"Add":{"text":" , attoparsec >= 0.12.1.2","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1142"}}]}},{"Edit":{"inode":{"change":15,"pos":1},"path":"quixotic.cabal","line":37,"atom":{"NewVertex":{"up_context":[{"change":13,"pos":3089}],"down_context":[{"change":16,"pos":1780}],"flag":"BLOCK","start":1144,"end":1161,"inode":{"change":15,"pos":1}}},"contents":[{"Add":{"text":" , bytestring","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1160"}}]}},{"Edit":{"inode":{"change":15,"pos":1},"path":"quixotic.cabal","line":53,"atom":{"NewVertex":{"up_context":[{"change":17,"pos":1084}],"down_context":[{"change":18,"pos":1070}],"flag":"BLOCK","start":1162,"end":1200,"inode":{"change":15,"pos":1}}},"contents":[{"Add":{"text":" , base64-bytestring >= 1.0.0.1","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1199"}}]}},{"Edit":{"inode":{"change":15,"pos":1},"path":"quixotic.cabal","line":71,"atom":{"NewVertex":{"up_context":[{"change":16,"pos":2171}],"down_context":[{"change":13,"pos":3112}],"flag":"BLOCK","start":1201,"end":1218,"inode":{"change":15,"pos":1}}},"contents":[{"Add":{"text":" , attoparsec","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1217"}}]}},{"FileAdd":{"meta":{"basename":"scripts","metadata":576},"context":[{"change":19,"pos":2}],"contents":[]}},{"FileAdd":{"meta":{"basename":"create_project.sh","metadata":64},"context":[{"change":0,"pos":1220}],"contents":[{"Add":{"text":"#!/bin/bash","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1253"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1254"}},{"Add":{"text":"curl -v -u \"nuttycom:kjntest\" -H \"Content-Type: application/json\" -d '{\"projectName\":\"the\"}' http://localhost:8000/projects","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1378"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1379"}}]}},{"FileAdd":{"meta":{"basename":"create_user.sh","metadata":64},"context":[{"change":0,"pos":1220}],"contents":[{"Add":{"text":"#!/bin/bash","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1436"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1437"}},{"Add":{"text":"curl -v -H \"Content-Type: application/json\" -d '{\"username\":\"nuttycom\", \"password\":\"kjntest\", \"email\":\"kris@quixoticcompany.com\", \"btcAddr\":\"1KamUn1BaRMd2HwikyQWGTdUvfPScg9QA5\"}' http://localhost:8000/register","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1647"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1648"}}]}},{"Edit":{"inode":{"change":12,"pos":5188},"path":"server/Main.hs","line":17,"atom":{"NewVertex":{"up_context":[{"change":2,"pos":117}],"down_context":[{"change":3,"pos":782}],"flag":"BLOCK","start":1691,"end":1724,"inode":{"change":12,"pos":5188}}},"contents":[{"Add":{"text":"import Quixotic.Snaplet.Projects","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1723"}}]}},{"Replacement":{"inode":{"change":12,"pos":5188},"path":"server/Main.hs","line":52,"ins":{"up_context":[{"change":2,"pos":179}],"down_context":[{"change":3,"pos":3639}],"flag":"BLOCK","start":1725,"end":1825,"inode":{"change":12,"pos":5188}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":3,"pos":106},"to":{"change":3,"start":823,"end":867},"introduced_by":3},{"previous":"","flag":"DELETED","from":{"change":2,"pos":179},"to":{"change":3,"start":823,"end":867},"introduced_by":2},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":823},"to":{"change":3,"start":823,"end":867},"introduced_by":3}],"inode":{"change":12,"pos":5188}},"ins_contents":[{"Add":{"text":" , (\"register\", method POST registerHandler)","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1780"}},{"Add":{"text":" , (\"projects\", projectsHandler)","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1824"}}],"del_contents":[{"Del":{"text":" , (\"register\", registerHandler)","pos":"BROSTG5KP3NUNLSYPVQID254TE47E5RKQAKLPIY7PGWETE6JNMTAC:866"}}]}},{"Replacement":{"inode":{"change":12,"pos":5188},"path":"server/Main.hs","line":57,"ins":{"up_context":[{"change":3,"pos":3862}],"down_context":[{"change":3,"pos":8999}],"flag":"BLOCK","start":1826,"end":1943,"inode":{"change":12,"pos":5188}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3862},"to":{"change":3,"start":3862,"end":3957},"introduced_by":3}],"inode":{"change":12,"pos":5188}},"ins_contents":[{"Add":{"text":" , (\"projects/:projectId\", method GET ok)","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1878"}},{"Add":{"text":" , (\"payouts/:projectId\", method GET payoutsHandler)","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1942"}}],"del_contents":[{"Del":{"text":" , (\"projects/:projectId\", ok)","pos":"Z7KS5XHHC6PAMTVBHXY7KUSS3BWAOU6FSYIITUCFOOJZU4OUJHBAC:3903"}},{"Del":{"text":" , (\"payouts/:projectId\", payoutsHandler)","pos":"Z7KS5XHHC6PAMTVBHXY7KUSS3BWAOU6FSYIITUCFOOJZU4OUJHBAC:3956"}}]}},{"Replacement":{"inode":{"change":2,"pos":203},"path":"server/Quixotic/Snaplet/Auth.hs","line":7,"ins":{"up_context":[{"change":2,"pos":310}],"down_context":[{"change":2,"pos":423}],"flag":"BLOCK","start":1947,"end":1993,"inode":{"change":2,"pos":203}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":2,"pos":310},"to":{"change":2,"start":310,"end":423},"introduced_by":2}],"inode":{"change":2,"pos":203}},"ins_contents":[{"Add":{"text":"import Data.Attoparsec.ByteString (parseOnly)","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:1992"}}],"del_contents":[{"Del":{"text":"import Data.ByteString (split)","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:340"}},{"Del":{"text":"import Data.Attoparsec.ByteString ","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:375"}},{"Del":{"text":"import qualified Data.ByteString.Base64 as B64","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:422"}}]}},{"Edit":{"inode":{"change":2,"pos":203},"path":"server/Quixotic/Snaplet/Auth.hs","line":11,"atom":{"NewVertex":{"up_context":[{"change":2,"pos":465}],"down_context":[{"change":2,"pos":465}],"flag":"BLOCK","start":1994,"end":2039,"inode":{"change":2,"pos":203}}},"contents":[{"Add":{"text":"import Quixotic.Util.Http (authHeaderParser)","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2038"}}]}},{"Edit":{"inode":{"change":2,"pos":203},"path":"server/Quixotic/Snaplet/Auth.hs","line":18,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":2,"pos":605},"to":{"change":2,"start":605,"end":643},"introduced_by":2}],"inode":{"change":2,"pos":203}}},"contents":[{"Del":{"text":"","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:605"}},{"Del":{"text":"type AuthHeader = (Text, ByteString)","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:642"}}]}},{"Edit":{"inode":{"change":2,"pos":203},"path":"server/Quixotic/Snaplet/Auth.hs","line":19,"atom":{"EdgeMap":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":2,"pos":644},"to":{"change":2,"start":644,"end":1164},"introduced_by":2}],"inode":{"change":2,"pos":203}}},"contents":[{"Del":{"text":"authHeaderParser :: Parser AuthHeader","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:681"}},{"Del":{"text":"authHeaderParser = do","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:703"}},{"Del":{"text":" let isBase64Char w = (w >= 47 && w <= 57 ) ||","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:751"}},{"Del":{"text":" (w >= 64 && w <= 90 ) ||","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:799"}},{"Del":{"text":" (w >= 97 && w <= 122) ||","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:847"}},{"Del":{"text":" (w == 43 || w == 61 )","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:892"}},{"Del":{"text":" b64 <- string \"Basic\" *> takeWhile1 isBase64Char ","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:948"}},{"Del":{"text":" decoded <- either fail pure $ B64.decode b64","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:995"}},{"Del":{"text":" case split 58 decoded of","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:1022"}},{"Del":{"text":" (uname : pwd : []) -> pure $ (decodeUtf8 uname, pwd)","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:1079"}},{"Del":{"text":" _ -> fail \"Could not unpack auth header into username and password components\"","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:1162"}},{"Del":{"text":"","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:1163"}}]}},{"Edit":{"inode":{"change":2,"pos":203},"path":"server/Quixotic/Snaplet/Auth.hs","line":23,"atom":{"NewVertex":{"up_context":[{"change":2,"pos":1323}],"down_context":[{"change":2,"pos":1323}],"flag":"BLOCK","start":2040,"end":2061,"inode":{"change":2,"pos":203}}},"contents":[{"Add":{"text":" logError rawHeader","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2060"}}]}},{"Edit":{"inode":{"change":2,"pos":203},"path":"server/Quixotic/Snaplet/Auth.hs","line":46,"atom":{"NewVertex":{"up_context":[{"change":2,"pos":2252}],"down_context":[{"change":2,"pos":2252}],"flag":"BLOCK","start":2062,"end":2100,"inode":{"change":2,"pos":203}}},"contents":[{"Add":{"text":" QDB{..} <- view qdb <$> with qm get","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2099"}}]}},{"Replacement":{"inode":{"change":2,"pos":203},"path":"server/Quixotic/Snaplet/Auth.hs","line":50,"ins":{"up_context":[{"change":2,"pos":2445}],"down_context":[{"change":2,"pos":2558}],"flag":"BLOCK","start":2101,"end":2361,"inode":{"change":2,"pos":203}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":2,"pos":2445},"to":{"change":2,"start":2445,"end":2558},"introduced_by":2}],"inode":{"change":2,"pos":203}},"ins_contents":[{"Add":{"text":" Just pid -> do","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2119"}},{"Add":{"text":" projects <- liftPG . runReaderT $ findUserProjects uid","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2180"}},{"Add":{"text":" if any (\\p -> p ^. projectId == pid) projects","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2232"}},{"Add":{"text":" then pure pid","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2254"}},{"Add":{"text":" else snapError 403 $ \"User \" ++ (tshow uid) ++ \" does not have access to project \" ++ (tshow pid)","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2360"}}],"del_contents":[{"Del":{"text":" Just pid -> error $ \"FIXME: implement project access check - got pid \" ++ \" \" ++ show uid ++ \" \" ++ show pid","pos":"I2KHGVD44KT4MQJXGCTVSQKMBO6TVCY72F26TLXGWRL6PHGF6RNQC:2557"}}]}},{"FileAdd":{"meta":{"basename":"Projects.hs","metadata":0},"context":[{"change":2,"pos":182}],"contents":[{"Add":{"text":"{-# LANGUAGE TemplateHaskell #-}","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2396"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2397"}},{"Add":{"text":"module Quixotic.Snaplet.Projects ","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2431"}},{"Add":{"text":" ( projectsHandler","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2451"}},{"Add":{"text":" ) where","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2461"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2462"}},{"Add":{"text":"import ClassyPrelude ","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2484"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2485"}},{"Add":{"text":"import Control.Lens","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2505"}},{"Add":{"text":"import Control.Monad.State","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2532"}},{"Add":{"text":"import Data.Aeson as A","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2555"}},{"Add":{"text":"import Quixotic","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2571"}},{"Add":{"text":"import Quixotic.Database","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2596"}},{"Add":{"text":"import Quixotic.Snaplet","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2620"}},{"Add":{"text":"import Quixotic.Snaplet.Auth","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2649"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2650"}},{"Add":{"text":"import Snap.Core","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2667"}},{"Add":{"text":"import Snap.Snaplet","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2687"}},{"Add":{"text":"import Snap.Snaplet.PostgresqlSimple","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2724"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2725"}},{"Add":{"text":"data CreateProject = CreateProject { createProjectName :: Text }","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2790"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2791"}},{"Add":{"text":"instance FromJSON CreateProject where","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2829"}},{"Add":{"text":" parseJSON (Object v) = CreateProject <$> v .: \"projectName\"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2891"}},{"Add":{"text":" parseJSON _ = mzero","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2913"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2914"}},{"Add":{"text":"projectsHandler :: Handler App App ()","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2952"}},{"Add":{"text":"projectsHandler = do","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:2973"}},{"Add":{"text":" void $ method POST projectCreateHandler","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3015"}},{"Add":{"text":" void $ method GET projectListHandler","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3054"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3055"}},{"Add":{"text":"projectCreateHandler :: Handler App App ProjectId","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3105"}},{"Add":{"text":"projectCreateHandler = do","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3131"}},{"Add":{"text":" QDB{..} <- view qdb <$> with qm get","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3169"}},{"Add":{"text":" uid <- requireUserId","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3192"}},{"Add":{"text":" requestBody <- readRequestBody 4096","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3230"}},{"Add":{"text":" cp <- maybe (snapError 400 \"Could not parse project data\") pure $ A.decode requestBody","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3319"}},{"Add":{"text":" timestamp <- liftIO getCurrentTime","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3356"}},{"Add":{"text":" liftPG . runReaderT . createProject $ Project (createProjectName cp) timestamp uid","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3441"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3442"}},{"Add":{"text":"projectListHandler :: Handler App App [Project]","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3490"}},{"Add":{"text":"projectListHandler = ok ","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3515"}}]}},{"Replacement":{"inode":{"change":3,"pos":3234},"path":"server/Quixotic/Snaplet/Users.hs","line":39,"ins":{"up_context":[{"change":3,"pos":716}],"down_context":[{"change":3,"pos":751}],"flag":"BLOCK","start":3554,"end":3592,"inode":{"change":3,"pos":3234}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":716},"to":{"change":3,"start":716,"end":751},"introduced_by":3}],"inode":{"change":3,"pos":3234}},"ins_contents":[{"Add":{"text":" requestBody <- readRequestBody 4096","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3591"}}],"del_contents":[{"Del":{"text":" requestBody <- readRequestBody 0","pos":"BXGLKYRXO2O4NRM3BLNWQ7AWVPQXAMFS57MFYHJNOZZEZZW5BH6AC:750"}}]}},{"Replacement":{"inode":{"change":3,"pos":3234},"path":"server/Quixotic/Snaplet/Users.hs","line":41,"ins":{"up_context":[{"change":3,"pos":843}],"down_context":[{"change":3,"pos":1025}],"flag":"BLOCK","start":3593,"end":3800,"inode":{"change":3,"pos":3234}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":843},"to":{"change":3,"start":843,"end":1025},"introduced_by":3}],"inode":{"change":3,"pos":3234}},"ins_contents":[{"Add":{"text":" let createSUser = AU.createUser (userData ^. (cuser.username._UserName)) (userData ^. password)","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3690"}},{"Add":{"text":" createQUser = liftPG $ runReaderT (createUser $ userData ^. cuser)","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3763"}},{"Add":{"text":" authUser <- with auth createSUser","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3799"}}],"del_contents":[{"Del":{"text":" authUser <- with auth $ ","pos":"BXGLKYRXO2O4NRM3BLNWQ7AWVPQXAMFS57MFYHJNOZZEZZW5BH6AC:869"}},{"Del":{"text":" AU.createUser (userData ^. (cuser.username._UserName)) (userData ^. password)","pos":"BXGLKYRXO2O4NRM3BLNWQ7AWVPQXAMFS57MFYHJNOZZEZZW5BH6AC:951"}},{"Del":{"text":" let createQUser = liftPG $ runReaderT (createUser $ userData ^. cuser)","pos":"BXGLKYRXO2O4NRM3BLNWQ7AWVPQXAMFS57MFYHJNOZZEZZW5BH6AC:1024"}}]}},{"Replacement":{"inode":{"change":3,"pos":1088},"path":"server/Quixotic/Snaplet.hs","line":51,"ins":{"up_context":[{"change":3,"pos":3096}],"down_context":[{"change":3,"pos":3122}],"flag":"BLOCK","start":3802,"end":3827,"inode":{"change":3,"pos":1088}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3096},"to":{"change":3,"start":3096,"end":3122},"introduced_by":3}],"inode":{"change":3,"pos":1088}},"ins_contents":[{"Add":{"text":"ok :: MonadSnap m => m a","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3826"}}],"del_contents":[{"Del":{"text":"ok :: MonadSnap m => m ()","pos":"BROSTG5KP3NUNLSYPVQID254TE47E5RKQAKLPIY7PGWETE6JNMTAC:3121"}}]}},{"Edit":{"inode":{"change":3,"pos":1088},"path":"server/Quixotic/Snaplet.hs","line":56,"atom":{"NewVertex":{"up_context":[{"change":2,"pos":3904}],"down_context":[],"flag":"BLOCK","start":3828,"end":3829,"inode":{"change":3,"pos":1088}}},"contents":[{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3828"}}]}},{"Replacement":{"inode":{"change":3,"pos":3144},"path":"sql/quixotic-pg.sql","line":2,"ins":{"up_context":[{"change":3,"pos":3166}],"down_context":[{"change":3,"pos":3201}],"flag":"BLOCK","start":3832,"end":4123,"inode":{"change":3,"pos":3144}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3166},"to":{"change":3,"start":3166,"end":3201},"introduced_by":3}],"inode":{"change":3,"pos":3144}},"ins_contents":[{"Add":{"text":" id serial primary key,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3856"}},{"Add":{"text":" handle text not null,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3880"}},{"Add":{"text":" btc_addr text not null,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3906"}},{"Add":{"text":" email text not null ","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3930"}},{"Add":{"text":");","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3933"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3934"}},{"Add":{"text":"create table projects (","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3958"}},{"Add":{"text":" id serial primary key,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:3983"}},{"Add":{"text":" project_name text not null,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4013"}},{"Add":{"text":" inception_date timestamp without time zone not null,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4068"}},{"Add":{"text":" initiator_id integer references users (id) not null","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4122"}}],"del_contents":[{"Del":{"text":" btc_addr varchar(34) primary key","pos":"NVOCQVASZWTKQJG7GPH7KHKZZR7NUG4WLV5YY4KAIRPCJRWCZPIAC:3200"}}]}},{"Replacement":{"inode":{"change":3,"pos":3144},"path":"sql/quixotic-pg.sql","line":15,"ins":{"up_context":[{"change":3,"pos":3205}],"down_context":[{"change":3,"pos":3234}],"flag":"BLOCK","start":4124,"end":4209,"inode":{"change":3,"pos":3144}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3205},"to":{"change":3,"start":3205,"end":3234},"introduced_by":3}],"inode":{"change":3,"pos":3144}},"ins_contents":[{"Add":{"text":"create type event_t as enum ('start_work', 'stop_work');","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4180"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4181"}},{"Add":{"text":"create table work_events (","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4208"}}],"del_contents":[{"Del":{"text":"create table users_trusted (","pos":"NVOCQVASZWTKQJG7GPH7KHKZZR7NUG4WLV5YY4KAIRPCJRWCZPIAC:3233"}}]}},{"Replacement":{"inode":{"change":3,"pos":3144},"path":"sql/quixotic-pg.sql","line":19,"ins":{"up_context":[{"change":3,"pos":3259}],"down_context":[{"change":3,"pos":3357}],"flag":"BLOCK","start":4210,"end":4424,"inode":{"change":3,"pos":3144}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3259},"to":{"change":3,"start":3259,"end":3357},"introduced_by":3}],"inode":{"change":3,"pos":3144}},"ins_contents":[{"Add":{"text":" project_id integer references projects(id) not null,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4264"}},{"Add":{"text":" user_id integer references users(id) not null,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4313"}},{"Add":{"text":" btc_addr text not null,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4339"}},{"Add":{"text":" event_type event_t not null,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4370"}},{"Add":{"text":" event_time timestamp without time zone not null","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4420"}},{"Add":{"text":");","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4423"}}],"del_contents":[{"Del":{"text":" btc_addr varchar(34) references users (btc_addr) not null,","pos":"NVOCQVASZWTKQJG7GPH7KHKZZR7NUG4WLV5YY4KAIRPCJRWCZPIAC:3319"}},{"Del":{"text":" trust_interval interval not null","pos":"NVOCQVASZWTKQJG7GPH7KHKZZR7NUG4WLV5YY4KAIRPCJRWCZPIAC:3354"}},{"Del":{"text":")","pos":"NVOCQVASZWTKQJG7GPH7KHKZZR7NUG4WLV5YY4KAIRPCJRWCZPIAC:3356"}}]}},{"Replacement":{"inode":{"change":3,"pos":3144},"path":"sql/quixotic-pg.sql","line":26,"ins":{"up_context":[{"change":3,"pos":3358}],"down_context":[{"change":3,"pos":3418}],"flag":"BLOCK","start":4425,"end":4668,"inode":{"change":3,"pos":3144}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3358},"to":{"change":3,"start":3358,"end":3418},"introduced_by":3}],"inode":{"change":3,"pos":3144}},"ins_contents":[{"Add":{"text":"create table auctions (","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4448"}},{"Add":{"text":" id serial primary key,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4473"}},{"Add":{"text":" project_id integer references projects(id) not null,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4528"}},{"Add":{"text":" initiator_id integer references users (id) not null,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4583"}},{"Add":{"text":" raise_amount numeric not null,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4616"}},{"Add":{"text":" end_time timestamp without time zone not null","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4664"}},{"Add":{"text":");","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4667"}}],"del_contents":[{"Del":{"text":"create type event_type as enum ('start_work', 'stop_work');","pos":"NVOCQVASZWTKQJG7GPH7KHKZZR7NUG4WLV5YY4KAIRPCJRWCZPIAC:3417"}}]}},{"Replacement":{"inode":{"change":3,"pos":3144},"path":"sql/quixotic-pg.sql","line":34,"ins":{"up_context":[{"change":3,"pos":3419}],"down_context":[{"change":3,"pos":3442}],"flag":"BLOCK","start":4669,"end":4689,"inode":{"change":3,"pos":3144}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3419},"to":{"change":3,"start":3419,"end":3442},"introduced_by":3}],"inode":{"change":3,"pos":3144}},"ins_contents":[{"Add":{"text":"create table bids (","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4688"}}],"del_contents":[{"Del":{"text":"create table timelog (","pos":"NVOCQVASZWTKQJG7GPH7KHKZZR7NUG4WLV5YY4KAIRPCJRWCZPIAC:3441"}}]}},{"Replacement":{"inode":{"change":3,"pos":3144},"path":"sql/quixotic-pg.sql","line":36,"ins":{"up_context":[{"change":3,"pos":3467}],"down_context":[],"flag":"BLOCK","start":4690,"end":4912,"inode":{"change":3,"pos":3144}},"del":{"edges":[{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":3,"pos":3467},"to":{"change":3,"start":3467,"end":3610},"introduced_by":3}],"inode":{"change":3,"pos":3144}},"ins_contents":[{"Add":{"text":" auction_id integer references projects (id) not null,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4745"}},{"Add":{"text":" bidder_id integer references users (id) not null,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4797"}},{"Add":{"text":" bid_seconds integer not null,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4829"}},{"Add":{"text":" bid_amount numeric not null,","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4860"}},{"Add":{"text":" bid_time timestamp without time zone not null","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4908"}},{"Add":{"text":");","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:4911"}}],"del_contents":[{"Del":{"text":" btc_addr varchar(34) references users (btc_addr) not null,","pos":"NVOCQVASZWTKQJG7GPH7KHKZZR7NUG4WLV5YY4KAIRPCJRWCZPIAC:3527"}},{"Del":{"text":" log_time timestamp without time zone not null,","pos":"NVOCQVASZWTKQJG7GPH7KHKZZR7NUG4WLV5YY4KAIRPCJRWCZPIAC:3576"}},{"Del":{"text":" log_type event_type not null","pos":"NVOCQVASZWTKQJG7GPH7KHKZZR7NUG4WLV5YY4KAIRPCJRWCZPIAC:3607"}},{"Del":{"text":")","pos":"NVOCQVASZWTKQJG7GPH7KHKZZR7NUG4WLV5YY4KAIRPCJRWCZPIAC:3609"}}]}},{"FileAdd":{"meta":{"basename":"Util","metadata":576},"context":[{"change":13,"pos":3700}],"contents":[]}},{"FileAdd":{"meta":{"basename":"HttpSpec.hs","metadata":0},"context":[{"change":0,"pos":4914}],"contents":[{"Add":{"text":"{-# LANGUAGE OverloadedStrings, ScopedTypeVariables, NoImplicitPrelude #-}","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5007"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5008"}},{"Add":{"text":"module Quixotic.Util.HttpSpec where","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5044"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5045"}},{"Add":{"text":"import ClassyPrelude","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5066"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5067"}},{"Add":{"text":"import Quixotic.Util.Http","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5093"}},{"Add":{"text":"import Data.Attoparsec.ByteString ","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5128"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5129"}},{"Add":{"text":"import Test.Hspec","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5147"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5148"}},{"Add":{"text":"spec :: Spec","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5161"}},{"Add":{"text":"spec = do","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5171"}},{"Add":{"text":" describe \"HTTP Basic header parsing\" $ do","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5215"}},{"Add":{"text":" it \"parses the Basic auth header\" $ do","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5258"}},{"Add":{"text":" let rawHeader = \"Basic bnV0dHljb206a2pudGVzdA==\"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5313"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5314"}},{"Add":{"text":" (parseOnly authHeaderParser rawHeader) `shouldBe` (Right (\"nuttycom\", \"kjntest\"))","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5402"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5403"}},{"Add":{"text":"main :: IO ()","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5417"}},{"Add":{"text":"main = hspec spec","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5435"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5436"}},{"Add":{"text":"","pos":"PBD7LZYQHXAA3KLH2ZUX5GW4UFML6BQ32KXZF4KZ6OYFASUYFJ5QC:5437"}}]}}],"owner":"nuttycom","repo":"aftok","token":"quuYh0F7KL8JRrbY3M0D4Ve5spAZYoiBfPbAeZAsU9I=","login":null}

…

Dependencies

Change contents

Review