0000: 23 21 2f 75 73 72 2f 62 69 6e 2f 70 68 70 20 2d #!/usr/bin/php -
0010: 71 43 0a 3c 3f 70 68 70 0a 23 20 65 6e 63 6f 64 qC.<?php.# encod
0020: 69 6e 67 3a 20 75 74 66 2d 38 0a 23 20 61 70 69 ing: utf-8.# api
0030: 3a 20 63 6c 69 0a 23 20 74 69 74 6c 65 3a 20 77 : cli.# title: w
0040: 65 62 68 6f 6f 6b 0a 23 20 64 65 73 63 72 69 70 ebhook.# descrip
0050: 74 69 6f 6e 3a 20 74 6f 20 62 65 20 72 75 6e 20 tion: to be run
0060: 66 72 6f 6d 20 66 6f 73 73 69 6c 20 62 61 63 6b from fossil back
0070: 6f 66 66 69 63 65 2f 61 66 74 65 72 2d 72 65 63 office/after-rec
0080: 65 69 76 65 20 68 6f 6f 6b 73 0a 23 20 76 65 72 eive hooks.# ver
0090: 73 69 6f 6e 3a 20 30 2e 32 0a 23 20 64 6f 63 3a sion: 0.2.# doc:
00a0: 20 68 74 74 70 73 3a 2f 2f 66 6f 73 73 69 6c 2d https://fossil-
00b0: 73 63 6d 2e 6f 72 67 2f 68 6f 6d 65 2f 64 6f 63 scm.org/home/doc
00c0: 2f 74 72 75 6e 6b 2f 77 77 77 2f 68 6f 6f 6b 73 /trunk/www/hooks
00d0: 2e 6d 64 0a 23 0a 23 20 4d 65 61 6e 74 20 74 6f .md.#.# Meant to
00e0: 20 74 72 61 6e 73 66 6f 72 6d 20 63 6f 6d 6d 69 transform commi
00f0: 74 73 20 69 6e 74 6f 20 63 6f 6d 6d 6f 6e 20 77 ts into common w
0100: 65 62 68 6f 6f 6b 20 4a 53 4f 4e 20 66 6f 72 6d ebhook JSON form
0110: 61 74 73 2c 0a 23 20 61 6e 64 20 73 65 6e 64 20 ats,.# and send
0120: 74 68 65 6d 20 6f 66 66 2e 20 44 6f 65 73 20 61 them off. Does a
0130: 20 6c 69 74 74 65 20 70 72 65 70 72 6f 63 65 73 litte preproces
0140: 73 69 6e 67 20 61 6e 64 20 65 78 70 61 6e 73 69 sing and expansi
0150: 6f 6e 0a 23 20 6f 66 20 74 68 65 20 63 6f 6d 6d on.# of the comm
0160: 69 74 20 6c 69 73 74 2c 20 61 64 64 73 20 72 61 it list, adds ra
0170: 77 2f 20 75 72 6c 73 20 74 6f 20 65 61 73 65 20 w/ urls to ease
0180: 70 61 79 6c 6f 61 64 20 70 72 6f 63 65 73 73 69 payload processi
0190: 6e 67 2e 0a 23 0a 23 20 48 6f 6f 6b 20 73 79 6e ng..#.# Hook syn
01a0: 74 61 78 3a 0a 23 20 20 20 66 6f 73 73 69 6c 2d tax:.# fossil-
01b0: 77 65 62 68 6f 6f 6b 20 27 25 52 27 20 2d 2d 70 webhook '%R' --p
01c0: 69 6e 67 20 27 68 74 74 70 3a 2f 2f 73 65 72 76 ing 'http://serv
01d0: 69 63 65 2e 72 65 73 74 2f 61 70 69 3f 74 6f 6b ice.rest/api?tok
01e0: 65 6e 3d 31 32 33 27 0a 23 0a 23 20 50 61 72 61 en=123'.#.# Para
01f0: 6d 65 74 65 72 73 3a 0a 23 20 20 20 25 52 20 20 meters:.# %R
0200: 20 20 20 20 20 20 62 65 63 6f 6d 65 73 20 72 65 becomes re
0210: 70 6f 73 69 74 6f 72 79 20 66 69 6c 65 6e 61 6d pository filenam
0220: 65 20 28 52 45 51 55 49 52 45 44 29 0a 23 20 20 e (REQUIRED).#
0230: 20 2d 2d 66 73 6c 20 20 20 20 20 66 6f 73 73 69 --fsl fossi
0240: 6c 2d 73 74 79 6c 65 20 70 61 79 6c 6f 61 64 20 l-style payload
0250: 28 64 65 66 61 75 6c 74 29 0a 23 20 20 20 2d 2d (default).# --
0260: 67 69 74 20 20 20 20 20 63 72 61 66 74 73 20 61 git crafts a
0270: 20 67 69 74 68 75 62 2d 73 74 79 6c 65 20 70 61 github-style pa
0280: 79 6c 6f 61 64 0a 23 20 20 20 2d 2d 70 69 6e 67 yload.# --ping
0290: 20 20 20 20 62 61 73 69 63 20 70 69 6e 67 0a 23 basic ping.#
02a0: 20 20 20 2d 2d 69 66 3a 77 69 6b 69 20 74 65 73 --if:wiki tes
02b0: 74 20 61 72 74 69 66 61 63 74 20 6c 69 73 74 20 t artifact list
02c0: 66 6f 72 20 74 79 70 65 20 28 63 68 65 63 6b 2d for type (check-
02d0: 69 6e 2c 20 77 69 6b 69 2c 20 66 69 6c 65 29 0a in, wiki, file).
02e0: 23 20 20 20 68 74 74 70 73 3a 2f 2f 20 20 77 65 # https:// we
02f0: 62 68 6f 6f 6b 20 73 65 72 76 69 63 65 20 65 6e bhook service en
0300: 64 70 6f 69 6e 74 73 20 28 52 45 51 55 49 52 45 dpoints (REQUIRE
0310: 44 3b 20 63 61 6e 20 62 65 20 6d 75 6c 74 69 70 D; can be multip
0320: 6c 65 29 0a 23 20 20 20 2b 74 6f 6b 3d 31 32 33 le).# +tok=123
0330: 20 20 69 6e 6a 65 63 74 20 61 64 64 69 74 69 6f inject additio
0340: 6e 61 6c 20 70 61 72 61 6d 65 74 65 72 73 20 69 nal parameters i
0350: 6e 74 6f 20 70 61 79 6c 6f 61 64 0a 23 20 20 20 nto payload.#
0360: 2b 54 6f 6b 3a 42 65 61 72 20 61 64 64 20 48 54 +Tok:Bear add HT
0370: 54 50 20 72 65 71 75 65 73 74 20 68 65 61 64 65 TP request heade
0380: 72 73 0a 23 0a 23 20 54 68 65 20 25 52 20 70 61 rs.#.# The %R pa
0390: 72 61 6d 65 74 65 72 20 63 61 6e 20 61 6c 73 6f rameter can also
03a0: 20 62 65 20 66 65 64 20 69 6e 20 75 73 69 6e 67 be fed in using
03b0: 20 74 68 65 20 65 6e 76 20 76 61 72 69 61 62 6c the env variabl
03c0: 65 3a 0a 23 20 20 20 46 4f 53 53 49 4c 5f 52 45 e:.# FOSSIL_RE
03d0: 50 4f 53 49 54 4f 52 59 3d 27 25 52 27 20 66 6f POSITORY='%R' fo
03e0: 73 73 69 6c 2d 77 65 62 68 6f 6f 6b 20 2d 2d 66 ssil-webhook --f
03f0: 73 6c 20 27 68 74 74 70 73 3a 2f 2f 74 61 72 67 sl 'https://targ
0400: 65 74 2e 72 65 73 74 2f 27 0a 23 0a 0a 0a 23 2d et.rest/'.#...#-
0410: 2d 20 69 6e 69 74 0a 24 61 72 67 76 20 3d 20 24 - init.$argv = $
0420: 5f 53 45 52 56 45 52 5b 22 61 72 67 76 22 5d 3b _SERVER["argv"];
0430: 0a 24 63 66 67 20 3d 20 5b 0a 20 20 20 20 22 73 .$cfg = [. "s
0440: 74 61 72 74 22 20 3d 3e 20 6d 69 63 72 6f 74 69 tart" => microti
0450: 6d 65 28 54 52 55 45 29 2c 0a 20 20 20 20 22 64 me(TRUE),. "d
0460: 62 67 22 20 3d 3e 20 70 72 65 67 5f 67 72 65 70 bg" => preg_grep
0470: 28 22 7e 5e 2d 2b 28 64 65 3f 62 75 3f 67 7c 64 ("~^-+(de?bu?g|d
0480: 75 3f 6d 70 29 24 7e 69 22 2c 20 24 61 72 67 76 u?mp)$~i", $argv
0490: 29 2c 0a 20 20 20 20 22 67 69 74 22 20 3d 3e 20 ),. "git" =>
04a0: 70 72 65 67 5f 67 72 65 70 28 22 7e 5e 2d 2b 67 preg_grep("~^-+g
04b0: 69 3f 74 3f 24 7e 69 22 2c 20 24 61 72 67 76 29 i?t?$~i", $argv)
04c0: 2c 0a 20 20 20 20 22 70 69 6e 67 22 20 3d 3e 20 ,. "ping" =>
04d0: 70 72 65 67 5f 67 72 65 70 28 22 7e 5e 2d 2b 70 preg_grep("~^-+p
04e0: 69 3f 6e 3f 67 3f 24 7e 69 22 2c 20 24 61 72 67 i?n?g?$~i", $arg
04f0: 76 29 2c 0a 20 20 20 20 22 68 65 6c 70 22 20 3d v),. "help" =
0500: 3e 20 70 72 65 67 5f 67 72 65 70 28 22 7e 5e 2d > preg_grep("~^-
0510: 2b 68 65 3f 6c 3f 70 3f 24 7e 69 22 2c 20 24 61 +he?l?p?$~i", $a
0520: 72 67 76 29 2c 0a 20 20 20 20 22 72 65 70 6f 22 rgv),. "repo"
0530: 20 3d 3e 20 65 6d 70 74 79 28 24 5f 53 45 52 56 => empty($_SERV
0540: 45 52 5b 22 46 4f 53 53 49 4c 5f 52 45 50 4f 53 ER["FOSSIL_REPOS
0550: 49 54 4f 52 59 22 5d 29 0a 20 20 20 20 20 20 20 ITORY"]).
0560: 20 20 20 20 20 20 20 3f 20 63 75 72 72 65 6e 74 ? current
0570: 28 70 72 65 67 5f 67 72 65 70 28 22 7e 5e 2f 5c (preg_grep("~^/\
0580: 77 2b 2e 2b 5c 2e 28 66 73 6c 7c 66 6f 73 73 69 w+.+\.(fsl|fossi
0590: 6c 7c 73 71 6c 69 74 65 29 24 7e 22 2c 20 24 61 l|sqlite)$~", $a
05a0: 72 67 76 29 29 0a 20 20 20 20 20 20 20 20 20 20 rgv)).
05b0: 20 20 20 20 3a 20 24 5f 53 45 52 56 45 52 5b 22 : $_SERVER["
05c0: 46 4f 53 53 49 4c 5f 52 45 50 4f 53 49 54 4f 52 FOSSIL_REPOSITOR
05d0: 59 22 5d 2c 0a 20 20 20 20 22 61 64 64 22 20 3d Y"],. "add" =
05e0: 3e 20 70 72 65 67 5f 67 72 65 70 28 22 7e 5e 5c > preg_grep("~^\
05f0: 2b 2b 5b 5c 77 2e 2d 5d 2b 5b 3a 3d 5d 2e 2b 24 ++[\w.-]+[:=].+$
0600: 7e 22 2c 20 24 61 72 67 76 29 2c 0a 20 20 20 20 ~", $argv),.
0610: 22 69 66 22 20 3d 3e 20 70 72 65 67 5f 67 72 65 "if" => preg_gre
0620: 70 28 22 7e 5e 2d 2b 69 66 3a 5b 5c 77 2d 5d 2b p("~^-+if:[\w-]+
0630: 24 7e 69 22 2c 20 24 61 72 67 76 29 2c 0a 20 20 $~i", $argv),.
0640: 20 20 22 73 65 72 76 69 63 65 5f 75 72 6c 73 22 "service_urls"
0650: 20 3d 3e 20 70 72 65 67 5f 67 72 65 70 28 22 7e => preg_grep("~
0660: 5e 68 74 74 70 73 3f 3a 2f 2f 2e 2b 24 7e 69 22 ^https?://.+$~i"
0670: 2c 20 24 61 72 67 76 29 2c 0a 20 20 20 20 22 73 , $argv),. "s
0680: 74 64 69 6e 22 20 3d 3e 20 66 72 65 61 64 28 53 tdin" => fread(S
0690: 54 44 49 4e 2c 20 31 3c 3c 32 30 29 2c 0a 20 20 TDIN, 1<<20),.
06a0: 20 20 20 20 20 20 23 65 39 63 65 32 37 32 65 38 #e9ce272e8
06b0: 30 36 63 34 37 61 31 30 65 33 64 34 63 66 35 37 06c47a10e3d4cf57
06c0: 30 35 34 39 61 31 64 33 33 31 33 33 31 33 33 20 0549a1d33133133
06d0: 66 69 6c 65 20 73 72 63 2f 63 6f 64 65 2e 63 0a file src/code.c.
06e0: 20 20 20 20 20 20 20 20 23 31 64 62 33 32 63 33 #1db32c3
06f0: 66 66 36 63 35 39 36 39 31 39 31 64 35 37 35 63 ff6c5969191d575c
0700: 36 35 39 31 36 66 36 33 32 32 62 38 33 33 33 31 65916f6322b83331
0710: 33 20 77 69 6b 69 20 48 6f 6d 65 50 61 67 65 0a 3 wiki HomePage.
0720: 20 20 20 20 20 20 20 20 23 33 31 33 39 30 38 33 #3139083
0730: 39 30 33 38 31 33 39 30 38 31 33 39 31 33 38 31 9038139081391381
0740: 33 39 33 31 39 33 31 38 33 30 39 33 38 61 61 61 3931931830938aaa
0750: 61 20 63 68 65 63 6b 2d 69 6e 20 74 6f 20 74 72 a check-in to tr
0760: 75 6e 6b 20 62 79 20 75 73 65 72 20 6f 6e 20 32 unk by user on 2
0770: 32 32 32 2d 31 31 2d 33 30 20 30 30 3a 30 30 0a 222-11-30 00:00.
0780: 20 20 20 20 22 6a 73 6f 6e 22 20 3d 3e 20 54 52 "json" => TR
0790: 55 45 2c 20 23 21 70 72 65 67 5f 67 72 65 70 28 UE, #!preg_grep(
07a0: 22 2d 6d 75 6c 74 69 70 61 72 74 22 29 0a 20 20 "-multipart").
07b0: 20 20 22 75 73 65 72 22 20 3d 3e 20 6e 75 6c 6c "user" => null
07c0: 2c 0a 5d 3b 0a 2f 2f 20 62 61 73 69 63 20 70 61 ,.];.// basic pa
07d0: 72 61 6d 65 74 65 72 20 63 68 65 63 6b 73 0a 69 rameter checks.i
07e0: 66 20 28 65 6d 70 74 79 28 24 63 66 67 5b 22 72 f (empty($cfg["r
07f0: 65 70 6f 22 5d 29 20 7c 7c 20 65 6d 70 74 79 28 epo"]) || empty(
0800: 24 63 66 67 5b 22 73 65 72 76 69 63 65 5f 75 72 $cfg["service_ur
0810: 6c 73 22 5d 29 29 20 7b 0a 20 20 20 64 69 65 28 ls"])) {. die(
0820: 22 25 52 20 6f 72 20 75 72 6c 20 6d 69 73 73 69 "%R or url missi
0830: 6e 67 22 29 3b 0a 7d 0a 2f 2f 20 61 63 74 75 61 ng");.}.// actua
0840: 6c 6c 79 20 6a 75 73 74 20 64 6f 65 73 20 61 20 lly just does a
0850: 70 6c 61 69 6e 20 73 74 72 69 6e 67 20 6c 6f 6f plain string loo
0860: 6b 75 70 20 69 6e 20 73 74 64 69 6e 0a 65 6c 73 kup in stdin.els
0870: 65 69 66 20 28 24 63 66 67 5b 22 69 66 22 5d 29 eif ($cfg["if"])
0880: 20 7b 0a 20 20 20 20 69 66 5f 63 68 65 63 6b 73 {. if_checks
0890: 28 24 63 66 67 5b 22 69 66 22 5d 29 3b 0a 7d 0a ($cfg["if"]);.}.
08a0: 2f 2f 20 64 65 70 65 6e 64 65 6e 74 20 6f 70 74 // dependent opt
08b0: 69 6f 6e 73 0a 24 63 66 67 20 2b 3d 20 5b 0a 20 ions.$cfg += [.
08c0: 20 20 20 22 62 61 73 65 6e 61 6d 65 22 20 3d 3e "basename" =>
08d0: 20 67 65 74 5f 62 61 73 65 6e 61 6d 65 28 29 2c get_basename(),
08e0: 0a 20 20 20 20 22 62 61 73 65 75 72 6c 22 20 3d . "baseurl" =
08f0: 3e 20 67 65 74 5f 62 61 73 65 75 72 6c 28 29 2c > get_baseurl(),
0900: 0a 20 20 20 20 22 74 69 74 6c 65 22 20 3d 3e 20 . "title" =>
0910: 67 65 74 5f 63 6f 6e 66 69 67 28 22 70 72 6f 6a get_config("proj
0920: 65 63 74 2d 74 69 74 6c 65 22 29 2c 0a 5d 3b 0a ect-title"),.];.
0930: 0a 0a 23 2d 2d 20 70 61 79 6c 6f 61 64 20 74 79 ..#-- payload ty
0940: 70 65 73 0a 69 66 20 28 24 63 66 67 5b 22 68 65 pes.if ($cfg["he
0950: 6c 70 22 5d 29 20 7b 0a 20 20 20 64 69 65 28 22 lp"]) {. die("
0960: 55 73 61 67 65 20 61 73 20 68 6f 6f 6b 3a 5c 6e Usage as hook:\n
0970: 20 20 66 6f 73 73 69 6c 2d 77 65 62 68 6f 6f 6b fossil-webhook
0980: 20 25 52 20 2d 2d 67 69 74 20 68 74 74 70 3a 2f %R --git http:/
0990: 2f 73 65 72 76 69 63 65 2e 72 65 73 74 2f 54 4f /service.rest/TO
09a0: 4b 45 4e 2f 45 54 43 5c 6e 22 29 3b 0a 7d 0a 65 KEN/ETC\n");.}.e
09b0: 6c 73 65 69 66 20 28 24 63 66 67 5b 22 67 69 74 lseif ($cfg["git
09c0: 22 5d 29 20 7b 0a 20 20 20 20 24 72 65 71 75 65 "]) {. $reque
09d0: 73 74 20 3d 20 67 69 74 5f 72 65 71 75 65 73 74 st = git_request
09e0: 28 29 3b 0a 7d 0a 65 6c 73 65 69 66 20 28 24 63 ();.}.elseif ($c
09f0: 66 67 5b 22 70 69 6e 67 22 5d 29 20 7b 0a 20 20 fg["ping"]) {.
0a00: 20 20 24 72 65 71 75 65 73 74 20 3d 20 62 61 73 $request = bas
0a10: 69 63 5f 70 69 6e 67 28 29 3b 0a 7d 0a 65 6c 73 ic_ping();.}.els
0a20: 65 20 7b 0a 20 20 20 20 24 72 65 71 75 65 73 74 e {. $request
0a30: 20 3d 20 66 6f 73 73 69 6c 5f 72 65 71 75 65 73 = fossil_reques
0a40: 74 28 29 3b 0a 7d 0a 0a 23 2d 2d 20 61 6e 64 20 t();.}..#-- and
0a50: 73 65 6e 64 0a 61 64 64 5f 70 61 72 61 6d 73 28 send.add_params(
0a60: 24 72 65 71 75 65 73 74 29 3b 0a 69 66 20 28 24 $request);.if ($
0a70: 63 66 67 5b 22 64 62 67 22 5d 29 20 7b 20 0a 20 cfg["dbg"]) { .
0a80: 20 20 20 64 69 65 28 6a 73 6f 6e 5f 65 6e 63 6f die(json_enco
0a90: 64 65 28 24 72 65 71 75 65 73 74 2c 20 4a 53 4f de($request, JSO
0aa0: 4e 5f 50 52 45 54 54 59 5f 50 52 49 4e 54 7c 4a N_PRETTY_PRINT|J
0ab0: 53 4f 4e 5f 55 4e 45 53 43 41 50 45 44 5f 53 4c SON_UNESCAPED_SL
0ac0: 41 53 48 45 53 29 29 3b 0a 7d 0a 65 6c 73 65 20 ASHES));.}.else
0ad0: 7b 0a 20 20 20 20 73 65 6e 64 28 24 72 65 71 75 {. send($requ
0ae0: 65 73 74 2c 20 65 78 74 72 61 5f 68 65 61 64 65 est, extra_heade
0af0: 72 73 28 29 29 3b 0a 7d 0a 0a 0a 0a 0a 2f 2a 2a rs());.}...../**
0b00: 0a 20 2a 20 50 72 6f 63 65 73 73 20 2b 61 64 64 . * Process +add
0b10: 3d 70 61 72 61 6d 76 61 6c 20 61 72 67 75 6d 65 =paramval argume
0b20: 6e 74 73 2c 0a 20 2a 20 73 69 6d 70 6c 79 20 61 nts,. * simply a
0b30: 64 64 69 6e 67 20 74 68 65 6d 20 74 6f 20 24 72 dding them to $r
0b40: 65 71 75 65 73 74 5b 5d 20 74 6f 70 2d 6c 65 76 equest[] top-lev
0b50: 65 6c 2e 0a 20 2a 0a 20 2a 2f 0a 66 75 6e 63 74 el.. *. */.funct
0b60: 69 6f 6e 20 61 64 64 5f 70 61 72 61 6d 73 28 26 ion add_params(&
0b70: 24 72 65 71 75 65 73 74 29 20 7b 0a 20 20 20 20 $request) {.
0b80: 67 6c 6f 62 61 6c 20 24 63 66 67 3b 0a 20 20 20 global $cfg;.
0b90: 20 23 2d 2d 20 2b 61 64 64 3d 70 61 72 61 6d 73 #-- +add=params
0ba0: 3f 0a 20 20 20 20 66 6f 72 65 61 63 68 20 28 24 ?. foreach ($
0bb0: 63 66 67 5b 22 61 64 64 22 5d 20 61 73 20 24 61 cfg["add"] as $a
0bc0: 64 64 29 20 7b 0a 20 20 20 20 20 20 20 20 70 72 dd) {. pr
0bd0: 65 67 5f 6d 61 74 63 68 28 22 7e 5e 5c 2b 2b 28 eg_match("~^\++(
0be0: 5b 5c 77 2d 2e 5d 2b 29 5b 3d 5d 28 2e 2b 29 24 [\w-.]+)[=](.+)$
0bf0: 7e 22 2c 20 24 61 64 64 2c 20 24 6b 76 29 3b 0a ~", $add, $kv);.
0c00: 20 20 20 20 20 20 20 20 24 72 65 71 75 65 73 74 $request
0c10: 5b 24 6b 76 5b 31 5d 5d 20 3d 20 24 6b 76 5b 32 [$kv[1]] = $kv[2
0c20: 5d 3b 0a 20 20 20 20 7d 0a 7d 0a 0a 2f 2a 2a 0a ];. }.}../**.
0c30: 20 2a 20 50 72 6f 63 65 73 73 20 2b 48 74 74 70 * Process +Http
0c40: 3a 48 65 61 64 65 72 73 20 61 72 67 75 6d 65 6e :Headers argumen
0c50: 74 73 2c 0a 20 2a 20 63 6f 6c 6c 65 63 74 69 6e ts,. * collectin
0c60: 67 20 74 68 65 6d 20 66 6f 72 20 43 55 52 4c 20 g them for CURL
0c70: 72 65 71 75 65 73 74 2e 0a 20 2a 0a 20 2a 2f 0a request.. *. */.
0c80: 66 75 6e 63 74 69 6f 6e 20 65 78 74 72 61 5f 68 function extra_h
0c90: 65 61 64 65 72 73 28 29 20 7b 0a 20 20 20 20 67 eaders() {. g
0ca0: 6c 6f 62 61 6c 20 24 63 66 67 3b 0a 20 20 20 20 lobal $cfg;.
0cb0: 24 68 65 61 64 65 72 73 20 3d 20 5b 5d 3b 0a 20 $headers = [];.
0cc0: 20 20 20 23 2d 2d 20 2b 54 74 6f 6b 65 6e 3a 70 #-- +Ttoken:p
0cd0: 61 72 61 6d 73 3f 0a 20 20 20 20 66 6f 72 65 61 arams?. forea
0ce0: 63 68 20 28 24 63 66 67 5b 22 61 64 64 22 5d 20 ch ($cfg["add"]
0cf0: 61 73 20 24 61 64 64 29 20 7b 0a 20 20 20 20 20 as $add) {.
0d00: 20 20 20 70 72 65 67 5f 6d 61 74 63 68 28 22 7e preg_match("~
0d10: 5e 5c 2b 2b 28 5b 5c 77 2d 5d 2b 29 5b 3a 5d 28 ^\++([\w-]+)[:](
0d20: 2e 2b 29 24 7e 22 2c 20 24 61 64 64 2c 20 24 6b .+)$~", $add, $k
0d30: 76 29 3b 0a 20 20 20 20 20 20 20 20 24 68 65 61 v);. $hea
0d40: 64 65 72 73 5b 5d 20 3d 20 22 24 6b 76 5b 31 5d ders[] = "$kv[1]
0d50: 3a 20 24 6b 76 5b 32 5d 22 3b 0a 20 20 20 20 7d : $kv[2]";. }
0d60: 0a 20 20 20 20 72 65 74 75 72 6e 20 24 68 65 61 . return $hea
0d70: 64 65 72 73 3b 0a 7d 0a 0a 0a 2f 2a 2a 0a 20 2a ders;.}.../**. *
0d80: 20 53 65 6e 64 69 6e 67 0a 20 2a 0a 20 2a 2f 0a Sending. *. */.
0d90: 66 75 6e 63 74 69 6f 6e 20 73 65 6e 64 28 24 72 function send($r
0da0: 65 71 75 65 73 74 2c 20 24 68 65 61 64 65 72 73 equest, $headers
0db0: 3d 5b 5d 29 20 7b 0a 20 20 20 20 67 6c 6f 62 61 =[]) {. globa
0dc0: 6c 20 24 63 66 67 3b 0a 20 20 20 20 69 66 20 28 l $cfg;. if (
0dd0: 24 63 66 67 5b 22 6a 73 6f 6e 22 5d 29 20 7b 0a $cfg["json"]) {.
0de0: 20 20 20 20 20 20 20 20 24 72 65 71 75 65 73 74 $request
0df0: 20 3d 20 6a 73 6f 6e 5f 65 6e 63 6f 64 65 28 24 = json_encode($
0e00: 72 65 71 75 65 73 74 2c 20 4a 53 4f 4e 5f 50 52 request, JSON_PR
0e10: 45 54 54 59 5f 50 52 49 4e 54 29 3b 0a 20 20 20 ETTY_PRINT);.
0e20: 20 20 20 20 20 24 68 65 61 64 65 72 73 5b 5d 20 $headers[]
0e30: 3d 20 22 43 6f 6e 74 65 6e 74 2d 54 79 70 65 3a = "Content-Type:
0e40: 20 61 70 70 6c 69 63 61 74 69 6f 6e 2f 6a 73 6f application/jso
0e50: 6e 22 3b 0a 20 20 20 20 7d 0a 20 20 20 20 23 2d n";. }. #-
0e60: 2d 20 73 65 6e 64 20 71 75 65 72 79 0a 20 20 20 - send query.
0e70: 20 66 6f 72 65 61 63 68 20 28 24 63 66 67 5b 22 foreach ($cfg["
0e80: 73 65 72 76 69 63 65 5f 75 72 6c 73 22 5d 20 61 service_urls"] a
0e90: 73 20 24 75 72 6c 29 20 7b 0a 20 20 20 20 20 20 s $url) {.
0ea0: 20 20 24 63 20 3d 20 63 75 72 6c 5f 69 6e 69 74 $c = curl_init
0eb0: 28 29 3b 0a 20 20 20 20 20 20 20 20 63 75 72 6c ();. curl
0ec0: 5f 73 65 74 6f 70 74 5f 61 72 72 61 79 28 24 63 _setopt_array($c
0ed0: 2c 20 5b 0a 20 20 20 20 20 20 20 20 20 20 20 20 , [.
0ee0: 43 55 52 4c 4f 50 54 5f 55 52 4c 20 3d 3e 20 24 CURLOPT_URL => $
0ef0: 75 72 6c 2c 0a 20 20 20 20 20 20 20 20 20 20 20 url,.
0f00: 20 43 55 52 4c 4f 50 54 5f 50 4f 53 54 20 3d 3e CURLOPT_POST =>
0f10: 20 31 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 1,.
0f20: 43 55 52 4c 4f 50 54 5f 50 4f 53 54 46 49 45 4c CURLOPT_POSTFIEL
0f30: 44 53 20 3d 3e 20 24 72 65 71 75 65 73 74 2c 0a DS => $request,.
0f40: 20 20 20 20 20 20 20 20 20 20 20 20 43 55 52 4c CURL
0f50: 4f 50 54 5f 48 54 54 50 48 45 41 44 45 52 20 3d OPT_HTTPHEADER =
0f60: 3e 20 24 68 65 61 64 65 72 73 2c 0a 20 20 20 20 > $headers,.
0f70: 20 20 20 20 20 20 20 20 43 55 52 4c 4f 50 54 5f CURLOPT_
0f80: 56 45 52 42 4f 53 45 20 3d 3e 20 31 2c 0a 20 20 VERBOSE => 1,.
0f90: 20 20 20 20 20 20 5d 29 3b 0a 20 20 20 20 20 20 ]);.
0fa0: 20 20 24 63 2d 3e 65 78 65 63 28 29 3b 0a 20 20 $c->exec();.
0fb0: 20 20 7d 0a 7d 0a 0a 0a 0a 2f 2a 2a 0a 20 2a 20 }.}..../**. *
0fc0: 44 65 66 69 6e 65 20 61 20 66 6f 73 73 69 6c 2d Define a fossil-
0fd0: 65 73 71 75 65 20 77 65 62 68 6f 6f 6b 20 70 61 esque webhook pa
0fe0: 79 6c 6f 61 64 2e 0a 20 2a 20 20 20 28 4e 6f 74 yload.. * (Not
0ff0: 20 6d 75 63 68 20 72 65 73 65 6d 62 6c 65 6e 63 much resemblenc
1000: 65 2c 20 73 68 6f 72 74 65 6e 65 64 20 61 74 74 e, shortened att
1010: 72 69 62 75 74 74 65 73 2c 20 6e 6f 20 70 61 79 ributtes, no pay
1020: 6c 6f 61 64 3a 7b 7d 20 77 72 61 70 70 69 6e 67 load:{} wrapping
1030: 2c 20 65 74 63 2e 29 0a 20 2a 0a 20 2a 2f 0a 66 , etc.). *. */.f
1040: 75 6e 63 74 69 6f 6e 20 66 6f 73 73 69 6c 5f 72 unction fossil_r
1050: 65 71 75 65 73 74 28 29 20 7b 0a 20 20 20 20 67 equest() {. g
1060: 6c 6f 62 61 6c 20 24 63 66 67 3b 0a 20 20 20 20 lobal $cfg;.
1070: 24 75 72 6c 20 3d 20 67 65 74 5f 62 61 73 65 75 $url = get_baseu
1080: 72 6c 28 29 3b 0a 20 20 20 20 72 65 74 75 72 6e rl();. return
1090: 20 5b 0a 20 20 20 20 20 20 20 20 27 24 74 79 70 [. '$typ
10a0: 65 27 20 3d 3e 20 22 77 65 62 68 6f 6f 6b 22 2c e' => "webhook",
10b0: 0a 20 20 20 20 20 20 20 20 27 24 63 6c 61 73 73 . '$class
10c0: 27 20 3d 3e 20 22 76 63 73 20 66 6f 73 73 69 6c ' => "vcs fossil
10d0: 22 2c 0a 20 20 20 20 20 20 20 20 27 24 76 65 72 ",. '$ver
10e0: 27 20 3d 3e 20 22 30 2e 32 22 2c 0a 20 20 20 20 ' => "0.2",.
10f0: 20 20 20 20 22 61 63 74 69 6f 6e 22 20 3d 3e 20 "action" =>
1100: 6d 61 69 6e 5f 61 63 74 69 6f 6e 28 24 63 66 67 main_action($cfg
1110: 5b 22 73 74 64 69 6e 22 5d 29 2c 0a 09 22 66 6f ["stdin"]),.."fo
1120: 73 73 69 6c 22 20 3d 3e 20 67 65 74 5f 63 6f 6e ssil" => get_con
1130: 66 69 67 28 22 73 65 72 76 65 72 2d 63 6f 64 65 fig("server-code
1140: 22 29 2c 0a 09 22 75 72 6c 22 20 3d 3e 20 24 75 "),.."url" => $u
1150: 72 6c 2c 0a 20 20 20 20 20 20 20 20 22 70 72 6f rl,. "pro
1160: 6a 65 63 74 22 20 3d 3e 20 5b 0a 20 20 20 20 20 ject" => [.
1170: 20 20 20 20 20 20 20 22 6e 61 6d 65 22 20 3d 3e "name" =>
1180: 20 24 63 66 67 5b 22 62 61 73 65 6e 61 6d 65 22 $cfg["basename"
1190: 5d 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 22 ],. "
11a0: 74 69 74 6c 65 22 20 3d 3e 20 67 65 74 5f 63 6f title" => get_co
11b0: 6e 66 69 67 28 22 70 72 6f 6a 65 63 74 2d 6e 61 nfig("project-na
11c0: 6d 65 22 29 2c 0a 20 20 20 20 20 20 20 20 20 20 me"),.
11d0: 20 20 22 64 65 73 63 72 69 70 74 69 6f 6e 22 20 "description"
11e0: 3d 3e 20 67 65 74 5f 63 6f 6e 66 69 67 28 22 70 => get_config("p
11f0: 72 6f 6a 65 63 74 2d 64 65 73 63 72 69 70 74 69 roject-descripti
1200: 6f 6e 22 29 2c 0a 20 20 20 20 20 20 20 20 20 20 on"),.
1210: 20 20 22 73 69 7a 65 22 20 3d 3e 20 66 69 6c 65 "size" => file
1220: 73 69 7a 65 28 24 63 66 67 5b 22 72 65 70 6f 22 size($cfg["repo"
1230: 5d 29 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 ]),.
1240: 22 69 64 22 20 3d 3e 20 67 65 74 5f 63 6f 6e 66 "id" => get_conf
1250: 69 67 28 22 70 72 6f 6a 65 63 74 2d 63 6f 64 65 ig("project-code
1260: 22 29 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 "),.
1270: 22 63 68 61 6e 67 65 73 22 20 3d 3e 20 69 6d 70 "changes" => imp
1280: 6c 6f 64 65 28 22 5c 6e 22 2c 20 61 72 72 61 79 lode("\n", array
1290: 5f 63 6f 6c 75 6d 6e 28 64 62 28 22 53 45 4c 45 _column(db("SELE
12a0: 43 54 20 63 6f 6d 6d 65 6e 74 20 46 52 4f 4d 20 CT comment FROM
12b0: 65 76 65 6e 74 20 4f 52 44 45 52 20 42 59 20 6d event ORDER BY m
12c0: 74 69 6d 65 20 44 45 53 43 20 4c 49 4d 49 54 20 time DESC LIMIT
12d0: 31 30 22 29 2c 20 22 63 6f 6d 6d 65 6e 74 22 29 10"), "comment")
12e0: 29 2c 0a 20 20 20 20 20 20 20 20 5d 2c 0a 20 20 ),. ],.
12f0: 20 20 20 20 20 20 22 61 70 69 22 20 3d 3e 20 5b "api" => [
1300: 0a 20 20 20 20 20 20 20 20 20 20 20 20 22 73 74 . "st
1310: 61 74 22 20 3d 3e 20 22 24 75 72 6c 2f 6a 73 6f at" => "$url/jso
1320: 6e 2f 73 74 61 74 22 2c 0a 20 20 20 20 20 20 20 n/stat",.
1330: 20 20 20 20 20 22 74 69 6d 65 6c 69 6e 65 22 20 "timeline"
1340: 3d 3e 20 22 24 75 72 6c 2f 6a 73 6f 6e 2f 74 69 => "$url/json/ti
1350: 6d 65 6c 69 6e 65 2f 63 68 65 63 6b 69 6e 22 2c meline/checkin",
1360: 0a 20 20 20 20 20 20 20 20 20 20 20 20 22 64 69 . "di
1370: 72 22 20 3d 3e 20 22 24 75 72 6c 2f 6a 73 6f 6e r" => "$url/json
1380: 2f 64 69 72 22 2c 0a 20 20 20 20 20 20 20 20 20 /dir",.
1390: 20 20 20 22 74 72 65 65 73 22 20 3d 3e 20 22 24 "trees" => "$
13a0: 75 72 6c 2f 65 78 74 2f 74 72 65 65 73 22 2c 0a url/ext/trees",.
13b0: 20 20 20 20 20 20 20 20 20 20 20 20 22 62 72 61 "bra
13c0: 6e 63 68 22 20 3d 3e 20 22 24 75 72 6c 2f 6a 73 nch" => "$url/js
13d0: 6f 6e 2f 62 72 61 6e 63 68 22 2c 0a 20 20 20 20 on/branch",.
13e0: 20 20 20 20 20 20 20 20 22 76 65 72 73 69 6f 6e "version
13f0: 22 20 3d 3e 20 22 24 75 72 6c 2f 6a 73 6f 6e 2f " => "$url/json/
1400: 76 65 72 73 69 6f 6e 22 2c 0a 20 20 20 20 20 20 version",.
1410: 20 20 20 20 20 20 22 72 65 70 6f 72 74 22 20 3d "report" =
1420: 3e 20 22 24 75 72 6c 2f 6a 73 6f 6e 2f 72 65 70 > "$url/json/rep
1430: 6f 72 74 22 2c 0a 20 20 20 20 20 20 20 20 20 20 ort",.
1440: 20 20 22 71 75 65 72 79 22 20 3d 3e 20 22 24 75 "query" => "$u
1450: 72 6c 2f 6a 73 6f 6e 2f 71 75 65 72 79 3f 73 71 rl/json/query?sq
1460: 6c 3d 7b 73 71 6c 7d 22 2c 0a 20 20 20 20 20 20 l={sql}",.
1470: 20 20 20 20 20 20 22 77 69 6b 69 5f 6c 69 73 74 "wiki_list
1480: 22 20 3d 3e 20 22 24 75 72 6c 2f 6a 73 6f 6e 2f " => "$url/json/
1490: 77 69 6b 69 2f 6c 69 73 74 22 2c 0a 20 20 20 20 wiki/list",.
14a0: 20 20 20 20 20 20 20 20 22 77 69 6b 69 5f 67 65 "wiki_ge
14b0: 74 22 20 3d 3e 20 22 24 75 72 6c 2f 6a 73 6f 6e t" => "$url/json
14c0: 2f 77 69 6b 69 2f 67 65 74 2f 7b 6e 61 6d 65 7d /wiki/get/{name}
14d0: 22 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 22 ",. "
14e0: 63 68 61 6e 67 65 6c 6f 67 22 20 3d 3e 20 22 24 changelog" => "$
14f0: 75 72 6c 2f 65 78 74 2f 63 68 61 6e 67 65 6c 6f url/ext/changelo
1500: 67 22 2c 0a 20 20 20 20 20 20 20 20 5d 2c 0a 20 g",. ],.
1510: 20 20 20 20 20 20 20 22 61 72 74 69 66 61 63 74 "artifact
1520: 73 22 20 3d 3e 20 61 72 72 61 79 5f 6d 61 70 28 s" => array_map(
1530: 0a 20 20 20 20 20 20 20 20 20 20 20 20 66 75 6e . fun
1540: 63 74 69 6f 6e 28 24 72 6f 77 29 20 75 73 65 28 ction($row) use(
1550: 24 75 72 6c 29 20 7b 0a 20 20 20 20 20 20 20 20 $url) {.
1560: 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 65 return e
1570: 78 70 61 6e 64 5f 61 72 74 69 66 61 63 74 28 24 xpand_artifact($
1580: 72 6f 77 2c 20 24 75 72 6c 29 3b 0a 20 20 20 20 row, $url);.
1590: 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 20 },.
15a0: 20 20 20 20 20 20 20 67 65 74 5f 61 72 74 69 66 get_artif
15b0: 61 63 74 73 28 24 63 66 67 5b 22 73 74 64 69 6e acts($cfg["stdin
15c0: 22 5d 29 0a 20 20 20 20 20 20 20 20 29 2c 0a 20 "]). ),.
15d0: 20 20 20 20 20 20 20 22 75 73 65 72 22 20 3d 3e "user" =>
15e0: 20 24 63 66 67 5b 22 75 73 65 72 22 5d 2c 0a 09 $cfg["user"],..
15f0: 22 74 69 6d 65 73 74 61 6d 70 22 20 3d 3e 20 74 "timestamp" => t
1600: 69 6d 65 28 29 2c 0a 20 20 20 20 20 20 20 20 22 ime(),. "
1610: 70 72 6f 63 54 69 6d 65 4d 73 22 20 3d 3e 20 20 procTimeMs" =>
1620: 31 30 30 30 20 2a 20 28 6d 69 63 72 6f 74 69 6d 1000 * (microtim
1630: 65 28 54 52 55 45 29 20 2d 20 24 63 66 67 5b 22 e(TRUE) - $cfg["
1640: 73 74 61 72 74 22 5d 29 2c 0a 20 20 20 20 5d 3b start"]),. ];
1650: 0a 7d 0a 0a 0a 2f 2a 2a 0a 20 2a 20 4d 6f 72 65 .}.../**. * More
1660: 20 62 61 73 69 63 20 70 61 79 6c 6f 61 64 0a 20 basic payload.
1670: 2a 0a 20 2a 2f 0a 66 75 6e 63 74 69 6f 6e 20 62 *. */.function b
1680: 61 73 69 63 5f 70 69 6e 67 28 29 20 7b 0a 20 20 asic_ping() {.
1690: 20 20 67 6c 6f 62 61 6c 20 24 63 66 67 3b 0a 20 global $cfg;.
16a0: 20 20 20 24 75 72 6c 20 3d 20 67 65 74 5f 62 61 $url = get_ba
16b0: 73 65 75 72 6c 28 29 3b 0a 20 20 20 20 72 65 74 seurl();. ret
16c0: 75 72 6e 20 5b 0a 20 20 20 20 20 20 20 20 27 24 urn [. '$
16d0: 74 79 70 65 27 20 3d 3e 20 22 77 65 62 68 6f 6f type' => "webhoo
16e0: 6b 22 2c 0a 20 20 20 20 20 20 20 20 27 24 63 6c k",. '$cl
16f0: 61 73 73 27 20 3d 3e 20 22 70 69 6e 67 20 62 61 ass' => "ping ba
1700: 73 69 63 22 2c 0a 20 20 20 20 20 20 20 20 22 61 sic",. "a
1710: 63 74 69 6f 6e 22 20 3d 3e 20 6d 61 69 6e 5f 61 ction" => main_a
1720: 63 74 69 6f 6e 28 24 63 66 67 5b 22 73 74 64 69 ction($cfg["stdi
1730: 6e 22 5d 29 2c 0a 09 22 75 72 6c 22 20 3d 3e 20 n"]),.."url" =>
1740: 24 75 72 6c 2c 0a 09 22 6e 61 6d 65 22 20 3d 3e $url,.."name" =>
1750: 20 24 63 66 67 5b 22 62 61 73 65 6e 61 6d 65 22 $cfg["basename"
1760: 5d 2c 0a 20 20 20 20 20 20 20 20 22 73 74 64 69 ],. "stdi
1770: 6e 22 20 3d 3e 20 24 63 66 67 5b 22 73 74 64 69 n" => $cfg["stdi
1780: 6e 22 5d 2c 0a 09 22 74 69 6d 65 73 74 61 6d 70 n"],.."timestamp
1790: 22 20 3d 3e 20 74 69 6d 65 28 29 2c 0a 20 20 20 " => time(),.
17a0: 20 5d 3b 0a 7d 0a 0a 20 0a 2f 2a 2a 0a 20 2a 20 ];.}.. ./**. *
17b0: 53 69 6d 75 6c 61 74 65 20 47 69 74 48 75 62 2d Simulate GitHub-
17c0: 73 74 79 6c 65 20 77 65 62 68 6f 6f 6b 2e 0a 20 style webhook..
17d0: 2a 20 28 55 6e 6c 69 6b 65 6c 79 20 74 68 61 74 * (Unlikely that
17e0: 20 77 65 20 63 61 6e 20 66 69 6c 6c 20 69 6e 20 we can fill in
17f0: 61 6c 6c 20 74 68 65 20 6d 69 6e 75 74 61 65 2e all the minutae.
1800: 29 0a 20 2a 0a 20 2a 2f 0a 66 75 6e 63 74 69 6f ). *. */.functio
1810: 6e 20 67 69 74 5f 72 65 71 75 65 73 74 28 29 20 n git_request()
1820: 7b 0a 20 20 20 20 67 6c 6f 62 61 6c 20 24 63 66 {. global $cf
1830: 67 3b 0a 20 20 20 20 23 20 70 72 65 70 61 72 65 g;. # prepare
1840: 20 76 61 6c 75 65 73 0a 20 20 20 20 24 75 73 65 values. $use
1850: 72 20 3d 20 67 65 74 5f 6d 61 69 6e 5f 75 73 65 r = get_main_use
1860: 72 28 29 3b 0a 20 20 20 20 24 75 72 6c 20 3d 20 r();. $url =
1870: 24 63 66 67 5b 22 62 61 73 65 75 72 6c 22 5d 3b $cfg["baseurl"];
1880: 0a 20 20 20 20 24 62 61 73 65 6e 61 6d 65 20 3d . $basename =
1890: 20 24 63 66 67 5b 22 62 61 73 65 6e 61 6d 65 22 $cfg["basename"
18a0: 5d 3b 0a 20 20 20 20 24 72 65 70 5f 69 64 20 3d ];. $rep_id =
18b0: 20 68 65 78 64 65 63 28 73 75 62 73 74 72 28 67 hexdec(substr(g
18c0: 65 74 5f 63 6f 6e 66 69 67 28 22 70 72 6f 6a 65 et_config("proje
18d0: 63 74 2d 63 6f 64 65 22 2c 20 22 31 32 46 46 46 ct-code", "12FFF
18e0: 46 22 29 2c 20 30 2c 20 36 29 29 3b 0a 20 20 20 F"), 0, 6));.
18f0: 20 24 61 72 74 20 3d 20 67 65 74 5f 61 72 74 69 $art = get_arti
1900: 66 61 63 74 73 28 24 63 66 67 5b 22 73 74 64 69 facts($cfg["stdi
1910: 6e 22 5d 29 3b 0a 20 20 20 20 24 73 65 6e 64 65 n"]);. $sende
1920: 72 20 3d 20 67 65 74 5f 75 73 65 72 28 24 61 72 r = get_user($ar
1930: 74 5b 30 5d 5b 22 75 75 69 64 22 5d 29 3b 0a 20 t[0]["uuid"]);.
1940: 20 20 20 23 20 61 73 73 65 6d 62 6c 65 0a 20 20 # assemble.
1950: 20 20 72 65 74 75 72 6e 20 5b 0a 20 20 20 20 20 return [.
1960: 20 22 61 63 74 69 6f 6e 22 20 3d 3e 20 22 65 64 "action" => "ed
1970: 69 74 65 64 22 2c 0a 20 20 20 20 20 20 22 72 75 ited",. "ru
1980: 6c 65 22 20 3d 3e 20 5b 0a 20 20 20 20 20 20 20 le" => [.
1990: 20 22 69 64 22 20 3d 3e 20 63 72 63 33 32 28 24 "id" => crc32($
19a0: 63 66 67 5b 22 73 74 64 69 6e 22 5d 29 2c 0a 20 cfg["stdin"]),.
19b0: 20 20 20 20 20 20 20 22 72 65 70 6f 73 69 74 6f "reposito
19c0: 72 79 5f 69 64 22 20 3d 3e 20 24 72 65 70 5f 69 ry_id" => $rep_i
19d0: 64 2c 0a 20 20 20 20 20 20 20 20 22 6e 61 6d 65 d,. "name
19e0: 22 20 3d 3e 20 24 62 61 73 65 6e 61 6d 65 2c 0a " => $basename,.
19f0: 20 20 20 20 20 20 20 20 22 63 72 65 61 74 65 64 "created
1a00: 5f 61 74 22 20 3d 3e 20 69 73 6f 38 36 30 31 28 _at" => iso8601(
1a10: 6d 74 69 6d 65 5f 65 76 65 6e 74 28 22 4d 49 4e mtime_event("MIN
1a20: 22 29 29 2c 0a 20 20 20 20 20 20 20 20 22 75 70 ")),. "up
1a30: 64 61 74 65 64 5f 61 74 22 20 3d 3e 20 69 73 6f dated_at" => iso
1a40: 38 36 30 31 28 6d 74 69 6d 65 5f 65 76 65 6e 74 8601(mtime_event
1a50: 28 22 4d 41 58 22 29 29 2c 0a 20 20 20 20 20 20 ("MAX")),.
1a60: 20 20 22 70 75 6c 6c 5f 72 65 71 75 65 73 74 5f "pull_request_
1a70: 72 65 76 69 65 77 73 5f 65 6e 66 6f 72 63 65 6d reviews_enforcem
1a80: 65 6e 74 5f 6c 65 76 65 6c 22 20 3d 3e 20 22 6f ent_level" => "o
1a90: 66 66 22 2c 0a 20 20 20 20 20 20 20 20 22 72 65 ff",. "re
1aa0: 71 75 69 72 65 64 5f 61 70 70 72 6f 76 69 6e 67 quired_approving
1ab0: 5f 72 65 76 69 65 77 5f 63 6f 75 6e 74 22 20 3d _review_count" =
1ac0: 3e 20 30 2c 0a 20 20 20 20 20 20 20 20 22 64 69 > 0,. "di
1ad0: 73 6d 69 73 73 5f 73 74 61 6c 65 5f 72 65 76 69 smiss_stale_revi
1ae0: 65 77 73 5f 6f 6e 5f 70 75 73 68 22 20 3d 3e 20 ews_on_push" =>
1af0: 66 61 6c 73 65 2c 0a 20 20 20 20 20 20 20 20 22 false,. "
1b00: 72 65 71 75 69 72 65 5f 63 6f 64 65 5f 6f 77 6e require_code_own
1b10: 65 72 5f 72 65 76 69 65 77 22 20 3d 3e 20 66 61 er_review" => fa
1b20: 6c 73 65 2c 0a 20 20 20 20 20 20 20 20 22 61 75 lse,. "au
1b30: 74 68 6f 72 69 7a 65 64 5f 64 69 73 6d 69 73 73 thorized_dismiss
1b40: 61 6c 5f 61 63 74 6f 72 73 5f 6f 6e 6c 79 22 20 al_actors_only"
1b50: 3d 3e 20 66 61 6c 73 65 2c 0a 20 20 20 20 20 20 => false,.
1b60: 20 20 22 69 67 6e 6f 72 65 5f 61 70 70 72 6f 76 "ignore_approv
1b70: 61 6c 73 5f 66 72 6f 6d 5f 63 6f 6e 74 72 69 62 als_from_contrib
1b80: 75 74 6f 72 73 22 20 3d 3e 20 66 61 6c 73 65 2c utors" => false,
1b90: 0a 20 20 20 20 20 20 20 20 22 72 65 71 75 69 72 . "requir
1ba0: 65 64 5f 73 74 61 74 75 73 5f 63 68 65 63 6b 73 ed_status_checks
1bb0: 22 20 3d 3e 20 5b 0a 20 20 20 20 20 20 20 20 20 " => [.
1bc0: 20 30 20 3d 3e 20 22 62 61 73 69 63 2d 43 49 22 0 => "basic-CI"
1bd0: 2c 0a 20 20 20 20 20 20 20 20 5d 2c 0a 20 20 20 ,. ],.
1be0: 20 20 20 20 20 22 72 65 71 75 69 72 65 64 5f 73 "required_s
1bf0: 74 61 74 75 73 5f 63 68 65 63 6b 73 5f 65 6e 66 tatus_checks_enf
1c00: 6f 72 63 65 6d 65 6e 74 5f 6c 65 76 65 6c 22 20 orcement_level"
1c10: 3d 3e 20 22 6e 6f 6e 5f 61 64 6d 69 6e 73 22 2c => "non_admins",
1c20: 0a 20 20 20 20 20 20 20 20 22 73 74 72 69 63 74 . "strict
1c30: 5f 72 65 71 75 69 72 65 64 5f 73 74 61 74 75 73 _required_status
1c40: 5f 63 68 65 63 6b 73 5f 70 6f 6c 69 63 79 22 20 _checks_policy"
1c50: 3d 3e 20 66 61 6c 73 65 2c 0a 20 20 20 20 20 20 => false,.
1c60: 20 20 22 73 69 67 6e 61 74 75 72 65 5f 72 65 71 "signature_req
1c70: 75 69 72 65 6d 65 6e 74 5f 65 6e 66 6f 72 63 65 uirement_enforce
1c80: 6d 65 6e 74 5f 6c 65 76 65 6c 22 20 3d 3e 20 22 ment_level" => "
1c90: 6f 66 66 22 2c 0a 20 20 20 20 20 20 20 20 22 6c off",. "l
1ca0: 69 6e 65 61 72 5f 68 69 73 74 6f 72 79 5f 72 65 inear_history_re
1cb0: 71 75 69 72 65 6d 65 6e 74 5f 65 6e 66 6f 72 63 quirement_enforc
1cc0: 65 6d 65 6e 74 5f 6c 65 76 65 6c 22 20 3d 3e 20 ement_level" =>
1cd0: 22 6f 66 66 22 2c 0a 20 20 20 20 20 20 20 20 22 "off",. "
1ce0: 61 64 6d 69 6e 5f 65 6e 66 6f 72 63 65 64 22 20 admin_enforced"
1cf0: 3d 3e 20 66 61 6c 73 65 2c 0a 20 20 20 20 20 20 => false,.
1d00: 20 20 22 61 6c 6c 6f 77 5f 66 6f 72 63 65 5f 70 "allow_force_p
1d10: 75 73 68 65 73 5f 65 6e 66 6f 72 63 65 6d 65 6e ushes_enforcemen
1d20: 74 5f 6c 65 76 65 6c 22 20 3d 3e 20 22 6f 66 66 t_level" => "off
1d30: 22 2c 0a 20 20 20 20 20 20 20 20 22 61 6c 6c 6f ",. "allo
1d40: 77 5f 64 65 6c 65 74 69 6f 6e 73 5f 65 6e 66 6f w_deletions_enfo
1d50: 72 63 65 6d 65 6e 74 5f 6c 65 76 65 6c 22 20 3d rcement_level" =
1d60: 3e 20 22 6f 66 66 22 2c 0a 20 20 20 20 20 20 20 > "off",.
1d70: 20 22 6d 65 72 67 65 5f 71 75 65 75 65 5f 65 6e "merge_queue_en
1d80: 66 6f 72 63 65 6d 65 6e 74 5f 6c 65 76 65 6c 22 forcement_level"
1d90: 20 3d 3e 20 22 6f 66 66 22 2c 0a 20 20 20 20 20 => "off",.
1da0: 20 20 20 22 72 65 71 75 69 72 65 64 5f 64 65 70 "required_dep
1db0: 6c 6f 79 6d 65 6e 74 73 5f 65 6e 66 6f 72 63 65 loyments_enforce
1dc0: 6d 65 6e 74 5f 6c 65 76 65 6c 22 20 3d 3e 20 22 ment_level" => "
1dd0: 6f 66 66 22 2c 0a 20 20 20 20 20 20 20 20 22 72 off",. "r
1de0: 65 71 75 69 72 65 64 5f 63 6f 6e 76 65 72 73 61 equired_conversa
1df0: 74 69 6f 6e 5f 72 65 73 6f 6c 75 74 69 6f 6e 5f tion_resolution_
1e00: 6c 65 76 65 6c 22 20 3d 3e 20 22 6f 66 66 22 2c level" => "off",
1e10: 0a 20 20 20 20 20 20 20 20 22 61 75 74 68 6f 72 . "author
1e20: 69 7a 65 64 5f 61 63 74 6f 72 73 5f 6f 6e 6c 79 ized_actors_only
1e30: 22 20 3d 3e 20 74 72 75 65 2c 0a 20 20 20 20 20 " => true,.
1e40: 20 20 20 22 61 75 74 68 6f 72 69 7a 65 64 5f 61 "authorized_a
1e50: 63 74 6f 72 5f 6e 61 6d 65 73 22 20 3d 3e 20 5b ctor_names" => [
1e60: 0a 20 20 20 20 20 20 20 20 20 20 30 20 3d 3e 20 . 0 =>
1e70: 24 75 73 65 72 2c 0a 20 20 20 20 20 20 20 20 5d $user,. ]
1e80: 2c 0a 20 20 20 20 20 20 5d 2c 0a 20 20 20 20 20 ,. ],.
1e90: 20 22 63 68 61 6e 67 65 73 22 20 3d 3e 20 5b 0a "changes" => [.
1ea0: 20 20 20 20 20 20 20 20 22 61 75 74 68 6f 72 69 "authori
1eb0: 7a 65 64 5f 61 63 74 6f 72 73 5f 6f 6e 6c 79 22 zed_actors_only"
1ec0: 20 3d 3e 20 5b 0a 20 20 20 20 20 20 20 20 20 20 => [.
1ed0: 22 66 72 6f 6d 22 20 3d 3e 20 66 61 6c 73 65 2c "from" => false,
1ee0: 0a 20 20 20 20 20 20 20 20 5d 2c 0a 20 20 20 20 . ],.
1ef0: 20 20 20 20 22 61 75 74 68 6f 72 69 7a 65 64 5f "authorized_
1f00: 61 63 74 6f 72 5f 6e 61 6d 65 73 22 20 3d 3e 20 actor_names" =>
1f10: 5b 0a 20 20 20 20 20 20 20 20 20 20 22 66 72 6f [. "fro
1f20: 6d 22 20 3d 3e 20 5b 5d 2c 0a 20 20 20 20 20 20 m" => [],.
1f30: 20 20 5d 2c 0a 20 20 20 20 20 20 5d 2c 0a 20 20 ],. ],.
1f40: 20 20 20 20 22 72 65 70 6f 73 69 74 6f 72 79 22 "repository"
1f50: 20 3d 3e 20 5b 0a 20 20 20 20 20 20 20 20 22 69 => [. "i
1f60: 64 22 20 3d 3e 20 24 72 65 70 5f 69 64 2c 0a 20 d" => $rep_id,.
1f70: 20 20 20 20 20 20 20 22 6e 6f 64 65 5f 69 64 22 "node_id"
1f80: 20 3d 3e 20 62 61 73 65 36 34 5f 65 6e 63 6f 64 => base64_encod
1f90: 65 28 24 75 72 6c 29 2c 0a 20 20 20 20 20 20 20 e($url),.
1fa0: 20 22 6e 61 6d 65 22 20 3d 3e 20 24 63 66 67 5b "name" => $cfg[
1fb0: 22 62 61 73 65 6e 61 6d 65 22 5d 2c 0a 20 20 20 "basename"],.
1fc0: 20 20 20 20 20 22 66 75 6c 6c 5f 6e 61 6d 65 22 "full_name"
1fd0: 20 3d 3e 20 24 63 66 67 5b 22 62 61 73 65 6e 61 => $cfg["basena
1fe0: 6d 65 22 5d 2c 0a 20 20 20 20 20 20 20 20 22 70 me"],. "p
1ff0: 72 69 76 61 74 65 22 20 3d 3e 20 66 61 6c 73 65 rivate" => false
2000: 2c 0a 20 20 20 20 20 20 20 20 22 6f 77 6e 65 72 ,. "owner
2010: 22 20 3d 3e 20 5b 0a 20 20 20 20 20 20 20 20 20 " => [.
2020: 20 22 6c 6f 67 69 6e 22 20 3d 3e 20 24 75 73 65 "login" => $use
2030: 72 2c 0a 20 20 20 20 20 20 20 20 20 20 22 69 64 r,. "id
2040: 22 20 3d 3e 20 63 72 63 33 32 28 24 75 73 65 72 " => crc32($user
2050: 29 2c 0a 20 20 20 20 20 20 20 20 20 20 22 6e 6f ),. "no
2060: 64 65 5f 69 64 22 20 3d 3e 20 62 61 73 65 36 34 de_id" => base64
2070: 5f 65 6e 63 6f 64 65 28 24 75 73 65 72 29 2c 0a _encode($user),.
2080: 20 20 20 20 20 20 20 20 20 20 22 61 76 61 74 61 "avata
2090: 72 5f 75 72 6c 22 20 3d 3e 20 22 24 75 72 6c 2f r_url" => "$url/
20a0: 6c 6f 67 6f 22 2c 0a 20 20 20 20 20 20 20 20 20 logo",.
20b0: 20 22 67 72 61 76 61 74 61 72 5f 69 64 22 20 3d "gravatar_id" =
20c0: 3e 20 22 22 2c 0a 20 20 20 20 20 20 20 20 20 20 > "",.
20d0: 22 75 72 6c 22 20 3d 3e 20 22 24 75 72 6c 2f 6a "url" => "$url/j
20e0: 73 6f 6e 2f 75 73 65 72 2f 67 65 74 2f 24 75 73 son/user/get/$us
20f0: 65 72 22 2c 0a 20 20 20 20 20 20 20 20 20 20 22 er",. "
2100: 68 74 6d 6c 5f 75 72 6c 22 20 3d 3e 20 22 24 75 html_url" => "$u
2110: 72 6c 2f 74 69 6d 65 6c 69 6e 65 3f 75 3d 24 75 rl/timeline?u=$u
2120: 73 65 72 22 2c 0a 20 20 20 20 20 20 20 20 20 20 ser",.
2130: 22 66 6f 6c 6c 6f 77 65 72 73 5f 75 72 6c 22 20 "followers_url"
2140: 3d 3e 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 => NULL,.
2150: 20 20 20 22 66 6f 6c 6c 6f 77 69 6e 67 5f 75 72 "following_ur
2160: 6c 22 20 3d 3e 20 4e 55 4c 4c 2c 0a 20 20 20 20 l" => NULL,.
2170: 20 20 20 20 20 20 22 67 69 73 74 73 5f 75 72 6c "gists_url
2180: 22 20 3d 3e 20 22 24 75 72 6c 2f 75 6e 76 65 72 " => "$url/unver
2190: 73 69 6f 6e 65 64 22 2c 0a 20 20 20 20 20 20 20 sioned",.
21a0: 20 20 20 22 73 74 61 72 72 65 64 5f 75 72 6c 22 "starred_url"
21b0: 20 3d 3e 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 => NULL,.
21c0: 20 20 20 20 22 73 75 62 73 63 72 69 70 74 69 6f "subscriptio
21d0: 6e 73 5f 75 72 6c 22 20 3d 3e 20 4e 55 4c 4c 2c ns_url" => NULL,
21e0: 0a 20 20 20 20 20 20 20 20 20 20 22 6f 72 67 61 . "orga
21f0: 6e 69 7a 61 74 69 6f 6e 73 5f 75 72 6c 22 20 3d nizations_url" =
2200: 3e 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 20 > NULL,.
2210: 20 20 22 72 65 70 6f 73 5f 75 72 6c 22 20 3d 3e "repos_url" =>
2220: 20 64 69 72 6e 61 6d 65 28 24 75 72 6c 29 2c 0a dirname($url),.
2230: 20 20 20 20 20 20 20 20 20 20 22 65 76 65 6e 74 "event
2240: 73 5f 75 72 6c 22 20 3d 3e 20 22 24 75 72 6c 2f s_url" => "$url/
2250: 74 69 6d 65 6c 69 6e 65 22 2c 0a 20 20 20 20 20 timeline",.
2260: 20 20 20 20 20 22 72 65 63 65 69 76 65 64 5f 65 "received_e
2270: 76 65 6e 74 73 5f 75 72 6c 22 20 3d 3e 20 22 24 vents_url" => "$
2280: 75 72 6c 2f 6a 73 6f 6e 2f 74 69 6d 65 6c 69 6e url/json/timelin
2290: 65 22 2c 0a 20 20 20 20 20 20 20 20 20 20 22 74 e",. "t
22a0: 79 70 65 22 20 3d 3e 20 22 4f 72 67 61 6e 69 7a ype" => "Organiz
22b0: 61 74 69 6f 6e 22 2c 0a 20 20 20 20 20 20 20 20 ation",.
22c0: 20 20 22 73 69 74 65 5f 61 64 6d 69 6e 22 20 3d "site_admin" =
22d0: 3e 20 24 75 73 65 72 3d 3d 24 73 65 6e 64 65 72 > $user==$sender
22e0: 2c 0a 20 20 20 20 20 20 20 20 5d 2c 0a 20 20 20 ,. ],.
22f0: 20 20 20 20 20 22 68 74 6d 6c 5f 75 72 6c 22 20 "html_url"
2300: 3d 3e 20 22 24 75 72 6c 22 2c 0a 20 20 20 20 20 => "$url",.
2310: 20 20 20 22 64 65 73 63 72 69 70 74 69 6f 6e 22 "description"
2320: 20 3d 3e 20 67 65 74 5f 63 6f 6e 66 69 67 28 22 => get_config("
2330: 70 72 6f 6a 65 63 74 2d 64 65 73 63 72 69 70 74 project-descript
2340: 69 6f 6e 22 29 2c 0a 20 20 20 20 20 20 20 20 22 ion"),. "
2350: 66 6f 72 6b 22 20 3d 3e 20 66 61 6c 73 65 2c 0a fork" => false,.
2360: 20 20 20 20 20 20 20 20 22 75 72 6c 22 20 3d 3e "url" =>
2370: 20 22 24 75 72 6c 22 2c 0a 20 20 20 20 20 20 20 "$url",.
2380: 20 22 66 6f 72 6b 73 5f 75 72 6c 22 20 3d 3e 20 "forks_url" =>
2390: 22 24 75 72 6c 22 2c 0a 20 20 20 20 20 20 20 20 "$url",.
23a0: 22 6b 65 79 73 5f 75 72 6c 22 20 3d 3e 20 4e 55 "keys_url" => NU
23b0: 4c 4c 2c 0a 20 20 20 20 20 20 20 20 22 63 6f 6c LL,. "col
23c0: 6c 61 62 6f 72 61 74 6f 72 73 5f 75 72 6c 22 20 laborators_url"
23d0: 3d 3e 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 => NULL,.
23e0: 20 22 74 65 61 6d 73 5f 75 72 6c 22 20 3d 3e 20 "teams_url" =>
23f0: 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 20 22 68 NULL,. "h
2400: 6f 6f 6b 73 5f 75 72 6c 22 20 3d 3e 20 22 24 75 ooks_url" => "$u
2410: 72 6c 2f 65 78 74 2f 68 6f 6f 6b 73 22 2c 0a 20 rl/ext/hooks",.
2420: 20 20 20 20 20 20 20 22 69 73 73 75 65 5f 65 76 "issue_ev
2430: 65 6e 74 73 5f 75 72 6c 22 20 3d 3e 20 22 24 75 ents_url" => "$u
2440: 72 6c 2f 6a 73 6f 6e 2f 72 65 70 6f 72 74 2f 6c rl/json/report/l
2450: 69 73 74 22 2c 0a 20 20 20 20 20 20 20 20 22 65 ist",. "e
2460: 76 65 6e 74 73 5f 75 72 6c 22 20 3d 3e 20 22 24 vents_url" => "$
2470: 75 72 6c 2f 6a 73 6f 6e 2f 74 69 6d 65 6c 69 6e url/json/timelin
2480: 65 2f 65 76 65 6e 74 22 2c 0a 20 20 20 20 20 20 e/event",.
2490: 20 20 22 61 73 73 69 67 6e 65 65 73 5f 75 72 6c "assignees_url
24a0: 22 20 3d 3e 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 " => NULL,.
24b0: 20 20 20 22 62 72 61 6e 63 68 65 73 5f 75 72 6c "branches_url
24c0: 22 20 3d 3e 20 22 24 75 72 6c 2f 6a 73 6f 6e 2f " => "$url/json/
24d0: 62 72 61 6e 63 68 2f 6c 69 73 74 22 2c 0a 20 20 branch/list",.
24e0: 20 20 20 20 20 20 22 74 61 67 73 5f 75 72 6c 22 "tags_url"
24f0: 20 3d 3e 20 22 24 75 72 6c 2f 6a 73 6f 6e 2f 74 => "$url/json/t
2500: 61 67 2f 6c 69 73 74 22 2c 0a 20 20 20 20 20 20 ag/list",.
2510: 20 20 22 62 6c 6f 62 73 5f 75 72 6c 22 20 3d 3e "blobs_url" =>
2520: 20 22 24 75 72 6c 2f 75 72 69 2d 6c 69 73 74 22 "$url/uri-list"
2530: 2c 20 23 20 6a 73 6f 6e 2f 61 72 74 69 66 61 63 , # json/artifac
2540: 74 2d 6c 69 73 74 3f 0a 20 20 20 20 20 20 20 20 t-list?.
2550: 22 67 69 74 5f 74 61 67 73 5f 75 72 6c 22 20 3d "git_tags_url" =
2560: 3e 20 22 24 75 72 6c 2f 6a 73 6f 6e 2f 74 61 67 > "$url/json/tag
2570: 2f 6c 69 73 74 22 2c 0a 20 20 20 20 20 20 20 20 /list",.
2580: 22 67 69 74 5f 72 65 66 73 5f 75 72 6c 22 20 3d "git_refs_url" =
2590: 3e 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 20 > NULL,.
25a0: 22 74 72 65 65 73 5f 75 72 6c 22 20 3d 3e 20 22 "trees_url" => "
25b0: 24 75 72 6c 2f 65 78 74 2f 74 72 65 65 73 22 2c $url/ext/trees",
25c0: 0a 20 20 20 20 20 20 20 20 22 73 74 61 74 75 73 . "status
25d0: 65 73 5f 75 72 6c 22 20 3d 3e 20 22 24 75 72 6c es_url" => "$url
25e0: 2f 6a 73 6f 6e 2f 73 74 61 74 75 73 22 2c 0a 20 /json/status",.
25f0: 20 20 20 20 20 20 20 22 6c 61 6e 67 75 61 67 65 "language
2600: 73 5f 75 72 6c 22 20 3d 3e 20 4e 55 4c 4c 2c 0a s_url" => NULL,.
2610: 20 20 20 20 20 20 20 20 22 73 74 61 72 67 61 7a "stargaz
2620: 65 72 73 5f 75 72 6c 22 20 3d 3e 20 4e 55 4c 4c ers_url" => NULL
2630: 2c 0a 20 20 20 20 20 20 20 20 22 63 6f 6e 74 72 ,. "contr
2640: 69 62 75 74 6f 72 73 5f 75 72 6c 22 20 3d 3e 20 ibutors_url" =>
2650: 22 24 75 72 6c 2f 6a 73 6f 6e 2f 75 73 65 72 2f "$url/json/user/
2660: 6c 69 73 74 22 2c 0a 20 20 20 20 20 20 20 20 22 list",. "
2670: 73 75 62 73 63 72 69 62 65 72 73 5f 75 72 6c 22 subscribers_url"
2680: 20 3d 3e 20 22 24 75 72 6c 2f 6a 73 6f 6e 2f 75 => "$url/json/u
2690: 73 65 72 2f 6c 69 73 74 22 2c 0a 20 20 20 20 20 ser/list",.
26a0: 20 20 20 22 73 75 62 73 63 72 69 70 74 69 6f 6e "subscription
26b0: 5f 75 72 6c 22 20 3d 3e 20 22 24 75 72 6c 2f 6a _url" => "$url/j
26c0: 73 6f 6e 2f 6c 6f 67 69 6e 22 2c 0a 20 20 20 20 son/login",.
26d0: 20 20 20 20 22 63 6f 6d 6d 69 74 73 5f 75 72 6c "commits_url
26e0: 22 20 3d 3e 20 22 24 75 72 6c 2f 6a 73 6f 6e 2f " => "$url/json/
26f0: 74 69 6d 65 6c 69 6e 65 2f 63 68 65 63 6b 69 6e timeline/checkin
2700: 22 2c 0a 20 20 20 20 20 20 20 20 22 67 69 74 5f ",. "git_
2710: 63 6f 6d 6d 69 74 73 5f 75 72 6c 22 20 3d 3e 20 commits_url" =>
2720: 22 24 75 72 6c 2f 6a 73 6f 6e 2f 74 69 6d 65 6c "$url/json/timel
2730: 69 6e 65 2f 63 68 65 63 6b 69 6e 22 2c 0a 20 20 ine/checkin",.
2740: 20 20 20 20 20 20 22 63 6f 6d 6d 65 6e 74 73 5f "comments_
2750: 75 72 6c 22 20 3d 3e 20 22 24 75 72 6c 2f 6a 73 url" => "$url/js
2760: 6f 6e 2f 66 6f 72 75 6d 2f 6c 69 73 74 22 2c 0a on/forum/list",.
2770: 20 20 20 20 20 20 20 20 22 69 73 73 75 65 5f 63 "issue_c
2780: 6f 6d 6d 65 6e 74 5f 75 72 6c 22 20 3d 3e 20 22 omment_url" => "
2790: 24 75 72 6c 2f 6a 73 6f 6e 2f 72 65 70 6f 72 74 $url/json/report
27a0: 2f 6c 69 73 74 22 2c 0a 20 20 20 20 20 20 20 20 /list",.
27b0: 22 63 6f 6e 74 65 6e 74 73 5f 75 72 6c 22 20 3d "contents_url" =
27c0: 3e 20 22 24 75 72 6c 2f 65 78 74 2f 72 61 77 2f > "$url/ext/raw/
27d0: 7b 2b 70 61 74 68 7d 22 2c 0a 20 20 20 20 20 20 {+path}",.
27e0: 20 20 22 63 6f 6d 70 61 72 65 5f 75 72 6c 22 20 "compare_url"
27f0: 3d 3e 20 22 24 75 72 6c 2f 6a 73 6f 6e 2f 64 69 => "$url/json/di
2800: 66 66 3f 76 31 3d 7b 62 61 73 65 7d 26 76 32 3d ff?v1={base}&v2=
2810: 7b 68 65 61 64 7d 22 2c 0a 20 20 20 20 20 20 20 {head}",.
2820: 20 22 6d 65 72 67 65 73 5f 75 72 6c 22 20 3d 3e "merges_url" =>
2830: 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 20 22 NULL,. "
2840: 61 72 63 68 69 76 65 5f 75 72 6c 22 20 3d 3e 20 archive_url" =>
2850: 22 24 75 72 6c 2f 7a 69 70 22 2c 0a 20 20 20 20 "$url/zip",.
2860: 20 20 20 20 22 64 6f 77 6e 6c 6f 61 64 73 5f 75 "downloads_u
2870: 72 6c 22 20 3d 3e 20 22 24 75 72 6c 2f 7a 69 70 rl" => "$url/zip
2880: 22 2c 0a 20 20 20 20 20 20 20 20 22 69 73 73 75 ",. "issu
2890: 65 73 5f 75 72 6c 22 20 3d 3e 20 22 75 72 6c 2f es_url" => "url/
28a0: 6a 73 6f 6e 2f 72 65 70 6f 72 74 2f 6c 69 73 74 json/report/list
28b0: 22 2c 0a 20 20 20 20 20 20 20 20 22 70 75 6c 6c ",. "pull
28c0: 73 5f 75 72 6c 22 20 3d 3e 20 4e 55 4c 4c 2c 0a s_url" => NULL,.
28d0: 20 20 20 20 20 20 20 20 22 6d 69 6c 65 73 74 6f "milesto
28e0: 6e 65 73 5f 75 72 6c 22 20 3d 3e 20 4e 55 4c 4c nes_url" => NULL
28f0: 2c 0a 20 20 20 20 20 20 20 20 22 6e 6f 74 69 66 ,. "notif
2900: 69 63 61 74 69 6f 6e 73 5f 75 72 6c 22 20 3d 3e ications_url" =>
2910: 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 20 22 NULL,. "
2920: 6c 61 62 65 6c 73 5f 75 72 6c 22 20 3d 3e 20 4e labels_url" => N
2930: 55 4c 4c 2c 0a 20 20 20 20 20 20 20 20 22 72 65 ULL,. "re
2940: 6c 65 61 73 65 73 5f 75 72 6c 22 20 3d 3e 20 22 leases_url" => "
2950: 24 75 72 6c 2f 65 78 74 2f 70 72 6f 6a 65 63 74 $url/ext/project
2960: 2e 6a 73 6f 6e 22 2c 0a 20 20 20 20 20 20 20 20 .json",.
2970: 22 64 65 70 6c 6f 79 6d 65 6e 74 73 5f 75 72 6c "deployments_url
2980: 22 20 3d 3e 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 " => NULL,.
2990: 20 20 20 22 63 72 65 61 74 65 64 5f 61 74 22 20 "created_at"
29a0: 3d 3e 20 69 73 6f 38 36 30 31 28 6d 74 69 6d 65 => iso8601(mtime
29b0: 5f 65 76 65 6e 74 28 22 4d 49 4e 22 29 29 2c 0a _event("MIN")),.
29c0: 20 20 20 20 20 20 20 20 22 75 70 64 61 74 65 64 "updated
29d0: 5f 61 74 22 20 3d 3e 20 69 73 6f 38 36 30 31 28 _at" => iso8601(
29e0: 6d 74 69 6d 65 5f 65 76 65 6e 74 28 22 4d 41 58 mtime_event("MAX
29f0: 22 29 29 2c 0a 20 20 20 20 20 20 20 20 22 70 75 ")),. "pu
2a00: 73 68 65 64 5f 61 74 22 20 3d 3e 20 69 73 6f 38 shed_at" => iso8
2a10: 36 30 31 28 6d 74 69 6d 65 5f 65 76 65 6e 74 28 601(mtime_event(
2a20: 22 4d 41 58 22 2c 20 22 57 48 45 52 45 20 74 79 "MAX", "WHERE ty
2a30: 70 65 3d 27 63 69 27 22 29 29 2c 20 20 20 23 20 pe='ci'")), #
2a40: 45 52 52 3f 3f 0a 20 20 20 20 20 20 20 20 22 67 ERR??. "g
2a50: 69 74 5f 75 72 6c 22 20 3d 3e 20 4e 55 4c 4c 2c it_url" => NULL,
2a60: 20 23 22 67 69 74 3a 2f 2f 67 69 74 68 75 62 2e #"git://github.
2a70: 63 6f 6d 2f 6f 63 74 6f 2d 6f 72 67 2f 6f 63 74 com/octo-org/oct
2a80: 6f 2d 72 65 70 6f 2e 67 69 74 22 2c 0a 20 20 20 o-repo.git",.
2a90: 20 20 20 20 20 22 66 6f 73 73 69 6c 5f 75 72 6c "fossil_url
2aa0: 22 20 3d 3e 20 22 24 75 72 6c 2f 78 66 65 72 22 " => "$url/xfer"
2ab0: 2c 20 20 23 20 4e 4f 4e 2d 53 54 41 4e 44 41 52 , # NON-STANDAR
2ac0: 44 20 3b 3e 0a 20 20 20 20 20 20 20 20 22 73 73 D ;>. "ss
2ad0: 68 5f 75 72 6c 22 20 3d 3e 20 22 24 75 72 6c 22 h_url" => "$url"
2ae0: 2c 0a 20 20 20 20 20 20 20 20 22 63 6c 6f 6e 65 ,. "clone
2af0: 5f 75 72 6c 22 20 3d 3e 20 22 24 75 72 6c 22 2c _url" => "$url",
2b00: 0a 20 20 20 20 20 20 20 20 22 73 76 6e 5f 75 72 . "svn_ur
2b10: 6c 22 20 3d 3e 20 4e 55 4c 4c 2c 0a 20 20 20 20 l" => NULL,.
2b20: 20 20 20 20 22 73 69 7a 65 22 20 3d 3e 20 66 69 "size" => fi
2b30: 6c 65 73 69 7a 65 28 24 63 66 67 5b 22 72 65 70 lesize($cfg["rep
2b40: 6f 22 5d 29 20 3e 3e 20 31 30 2c 0a 20 20 20 20 o"]) >> 10,.
2b50: 20 20 20 20 22 73 74 61 72 67 61 7a 65 72 73 5f "stargazers_
2b60: 63 6f 75 6e 74 22 20 3d 3e 20 30 2c 0a 20 20 20 count" => 0,.
2b70: 20 20 20 20 20 22 77 61 74 63 68 65 72 73 5f 63 "watchers_c
2b80: 6f 75 6e 74 22 20 3d 3e 20 30 2c 0a 20 20 20 20 ount" => 0,.
2b90: 20 20 20 20 22 6c 61 6e 67 75 61 67 65 22 20 3d "language" =
2ba0: 3e 20 6c 61 6e 67 75 61 67 65 5f 63 6f 75 6e 74 > language_count
2bb0: 28 29 2c 0a 20 20 20 20 20 20 20 20 22 68 61 73 (),. "has
2bc0: 5f 69 73 73 75 65 73 22 20 3d 3e 20 74 72 75 65 _issues" => true
2bd0: 2c 0a 20 20 20 20 20 20 20 20 22 68 61 73 5f 70 ,. "has_p
2be0: 72 6f 6a 65 63 74 73 22 20 3d 3e 20 66 61 6c 73 rojects" => fals
2bf0: 65 2c 0a 20 20 20 20 20 20 20 20 22 68 61 73 5f e,. "has_
2c00: 64 6f 77 6e 6c 6f 61 64 73 22 20 3d 3e 20 74 72 downloads" => tr
2c10: 75 65 2c 0a 20 20 20 20 20 20 20 20 22 68 61 73 ue,. "has
2c20: 5f 77 69 6b 69 22 20 3d 3e 20 66 61 6c 73 65 2c _wiki" => false,
2c30: 0a 20 20 20 20 20 20 20 20 22 68 61 73 5f 70 61 . "has_pa
2c40: 67 65 73 22 20 3d 3e 20 74 72 75 65 2c 0a 20 20 ges" => true,.
2c50: 20 20 20 20 20 20 22 66 6f 72 6b 73 5f 63 6f 75 "forks_cou
2c60: 6e 74 22 20 3d 3e 20 30 2c 0a 20 20 20 20 20 20 nt" => 0,.
2c70: 20 20 22 6d 69 72 72 6f 72 5f 75 72 6c 22 20 3d "mirror_url" =
2c80: 3e 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 20 > NULL,.
2c90: 22 61 72 63 68 69 76 65 64 22 20 3d 3e 20 66 61 "archived" => fa
2ca0: 6c 73 65 2c 0a 20 20 20 20 20 20 20 20 22 64 69 lse,. "di
2cb0: 73 61 62 6c 65 64 22 20 3d 3e 20 66 61 6c 73 65 sabled" => false
2cc0: 2c 0a 20 20 20 20 20 20 20 20 22 6f 70 65 6e 5f ,. "open_
2cd0: 69 73 73 75 65 73 5f 63 6f 75 6e 74 22 20 3d 3e issues_count" =>
2ce0: 20 24 74 69 63 6b 65 74 73 20 3d 20 69 6e 74 76 $tickets = intv
2cf0: 61 6c 28 64 62 28 22 53 45 4c 45 43 54 20 43 4f al(db("SELECT CO
2d00: 55 4e 54 28 31 29 20 61 73 20 63 20 46 52 4f 4d UNT(1) as c FROM
2d10: 20 74 69 63 6b 65 74 20 57 48 45 52 45 20 73 74 ticket WHERE st
2d20: 61 74 75 73 21 3d 27 43 6c 6f 73 65 64 27 22 29 atus!='Closed'")
2d30: 5b 30 5d 5b 22 63 22 5d 29 2c 0a 20 20 20 20 20 [0]["c"]),.
2d40: 20 20 20 22 6c 69 63 65 6e 73 65 22 20 3d 3e 20 "license" =>
2d50: 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 20 22 66 NULL,. "f
2d60: 6f 72 6b 73 22 20 3d 3e 20 30 2c 0a 20 20 20 20 orks" => 0,.
2d70: 20 20 20 20 22 6f 70 65 6e 5f 69 73 73 75 65 73 "open_issues
2d80: 22 20 3d 3e 20 24 74 69 63 6b 65 74 73 2c 0a 20 " => $tickets,.
2d90: 20 20 20 20 20 20 20 22 77 61 74 63 68 65 72 73 "watchers
2da0: 22 20 3d 3e 20 30 2c 0a 20 20 20 20 20 20 20 20 " => 0,.
2db0: 22 64 65 66 61 75 6c 74 5f 62 72 61 6e 63 68 22 "default_branch"
2dc0: 20 3d 3e 20 22 74 72 75 6e 6b 22 2c 0a 20 20 20 => "trunk",.
2dd0: 20 20 20 5d 2c 0a 20 20 20 20 20 20 22 6f 72 67 ],. "org
2de0: 61 6e 69 7a 61 74 69 6f 6e 22 20 3d 3e 20 5b 0a anization" => [.
2df0: 20 20 20 20 20 20 20 20 22 6c 6f 67 69 6e 22 20 "login"
2e00: 3d 3e 20 22 24 62 61 73 65 6e 61 6d 65 22 2c 0a => "$basename",.
2e10: 20 20 20 20 20 20 20 20 22 69 64 22 20 3d 3e 20 "id" =>
2e20: 63 72 63 33 32 28 24 62 61 73 65 6e 61 6d 65 29 crc32($basename)
2e30: 2c 0a 20 20 20 20 20 20 20 20 22 6e 6f 64 65 5f ,. "node_
2e40: 69 64 22 20 3d 3e 20 62 61 73 65 36 34 5f 65 6e id" => base64_en
2e50: 63 6f 64 65 28 24 62 61 73 65 6e 61 6d 65 29 2c code($basename),
2e60: 0a 20 20 20 20 20 20 20 20 22 75 72 6c 22 20 3d . "url" =
2e70: 3e 20 22 24 75 72 6c 22 2c 0a 20 20 20 20 20 20 > "$url",.
2e80: 20 20 22 72 65 70 6f 73 5f 75 72 6c 22 20 3d 3e "repos_url" =>
2e90: 20 22 24 75 72 6c 22 2c 0a 20 20 20 20 20 20 20 "$url",.
2ea0: 20 22 65 76 65 6e 74 73 5f 75 72 6c 22 20 3d 3e "events_url" =>
2eb0: 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 20 22 NULL,. "
2ec0: 68 6f 6f 6b 73 5f 75 72 6c 22 20 3d 3e 20 4e 55 hooks_url" => NU
2ed0: 4c 4c 2c 0a 20 20 20 20 20 20 20 20 22 69 73 73 LL,. "iss
2ee0: 75 65 73 5f 75 72 6c 22 20 3d 3e 20 4e 55 4c 4c ues_url" => NULL
2ef0: 2c 0a 20 20 20 20 20 20 20 20 22 6d 65 6d 62 65 ,. "membe
2f00: 72 73 5f 75 72 6c 22 20 3d 3e 20 4e 55 4c 4c 2c rs_url" => NULL,
2f10: 0a 20 20 20 20 20 20 20 20 22 70 75 62 6c 69 63 . "public
2f20: 5f 6d 65 6d 62 65 72 73 5f 75 72 6c 22 20 3d 3e _members_url" =>
2f30: 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 20 22 NULL,. "
2f40: 61 76 61 74 61 72 5f 75 72 6c 22 20 3d 3e 20 4e avatar_url" => N
2f50: 55 4c 4c 2c 0a 20 20 20 20 20 20 20 20 22 64 65 ULL,. "de
2f60: 73 63 72 69 70 74 69 6f 6e 22 20 3d 3e 20 67 65 scription" => ge
2f70: 74 5f 63 6f 6e 66 69 67 28 22 70 72 6f 6a 65 63 t_config("projec
2f80: 74 2d 6e 61 6d 65 22 29 2c 0a 20 20 20 20 20 20 t-name"),.
2f90: 5d 2c 0a 20 20 20 20 20 20 22 73 65 6e 64 65 72 ],. "sender
2fa0: 22 20 3d 3e 20 5b 0a 20 20 20 20 20 20 20 20 22 " => [. "
2fb0: 6c 6f 67 69 6e 22 20 3d 3e 20 24 73 65 6e 64 65 login" => $sende
2fc0: 72 2c 0a 20 20 20 20 20 20 20 20 22 69 64 22 20 r,. "id"
2fd0: 3d 3e 20 63 72 63 33 32 28 24 73 65 6e 64 65 72 => crc32($sender
2fe0: 29 2c 0a 20 20 20 20 20 20 20 20 22 6e 6f 64 65 ),. "node
2ff0: 5f 69 64 22 20 3d 3e 20 62 61 73 65 36 34 5f 65 _id" => base64_e
3000: 6e 63 6f 64 65 28 24 73 65 6e 64 65 72 29 2c 0a ncode($sender),.
3010: 20 20 20 20 20 20 20 20 22 61 76 61 74 61 72 5f "avatar_
3020: 75 72 6c 22 20 3d 3e 20 22 24 75 72 6c 2f 6c 6f url" => "$url/lo
3030: 67 6f 22 2c 20 20 20 23 20 64 6f 20 77 65 20 68 go", # do we h
3040: 61 76 65 20 61 20 75 73 65 72 20 50 48 4f 54 4f ave a user PHOTO
3050: 20 6c 6f 6f 6b 75 70 3f 0a 20 20 20 20 20 20 20 lookup?.
3060: 20 22 67 72 61 76 61 74 61 72 5f 69 64 22 20 3d "gravatar_id" =
3070: 3e 20 22 22 2c 0a 20 20 20 20 20 20 20 20 22 75 > "",. "u
3080: 72 6c 22 20 3d 3e 20 22 24 75 72 6c 2f 6a 73 6f rl" => "$url/jso
3090: 6e 2f 75 73 65 72 2f 67 65 74 2f 24 73 65 6e 64 n/user/get/$send
30a0: 65 72 22 2c 0a 20 20 20 20 20 20 20 20 22 68 74 er",. "ht
30b0: 6d 6c 5f 75 72 6c 22 20 3d 3e 20 22 24 75 72 6c ml_url" => "$url
30c0: 2f 74 69 6d 65 6c 69 6e 65 3f 75 3d 24 73 65 6e /timeline?u=$sen
30d0: 64 65 72 22 2c 0a 20 20 20 20 20 20 20 20 22 66 der",. "f
30e0: 6f 6c 6c 6f 77 65 72 73 5f 75 72 6c 22 20 3d 3e ollowers_url" =>
30f0: 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 20 22 NULL,. "
3100: 66 6f 6c 6c 6f 77 69 6e 67 5f 75 72 6c 22 20 3d following_url" =
3110: 3e 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 20 > NULL,.
3120: 22 67 69 73 74 73 5f 75 72 6c 22 20 3d 3e 20 4e "gists_url" => N
3130: 55 4c 4c 2c 0a 20 20 20 20 20 20 20 20 22 73 74 ULL,. "st
3140: 61 72 72 65 64 5f 75 72 6c 22 20 3d 3e 20 4e 55 arred_url" => NU
3150: 4c 4c 2c 0a 20 20 20 20 20 20 20 20 22 73 75 62 LL,. "sub
3160: 73 63 72 69 70 74 69 6f 6e 73 5f 75 72 6c 22 20 scriptions_url"
3170: 3d 3e 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 => NULL,.
3180: 20 22 6f 72 67 61 6e 69 7a 61 74 69 6f 6e 73 5f "organizations_
3190: 75 72 6c 22 20 3d 3e 20 4e 55 4c 4c 2c 0a 20 20 url" => NULL,.
31a0: 20 20 20 20 20 20 22 72 65 70 6f 73 5f 75 72 6c "repos_url
31b0: 22 20 3d 3e 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 " => NULL,.
31c0: 20 20 20 22 65 76 65 6e 74 73 5f 75 72 6c 22 20 "events_url"
31d0: 3d 3e 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 => NULL,.
31e0: 20 22 72 65 63 65 69 76 65 64 5f 65 76 65 6e 74 "received_event
31f0: 73 5f 75 72 6c 22 20 3d 3e 20 4e 55 4c 4c 2c 0a s_url" => NULL,.
3200: 20 20 20 20 20 20 20 20 22 74 79 70 65 22 20 3d "type" =
3210: 3e 20 22 55 73 65 72 22 2c 0a 20 20 20 20 20 20 > "User",.
3220: 20 20 22 73 69 74 65 5f 61 64 6d 69 6e 22 20 3d "site_admin" =
3230: 3e 20 24 73 65 6e 64 65 72 3d 3d 24 75 73 65 72 > $sender==$user
3240: 2c 0a 20 20 20 20 20 20 5d 2c 0a 20 20 20 20 5d ,. ],. ]
3250: 3b 0a 20 20 20 20 23 20 64 6f 2e 2e 2e 0a 7d 0a ;. # do....}.
3260: 0a 0a 2f 2a 2a 0a 20 2a 20 44 61 74 61 62 61 73 ../**. * Databas
3270: 65 20 71 75 65 72 79 20 73 68 6f 72 74 68 61 6e e query shorthan
3280: 64 2e 20 28 55 73 69 6e 67 20 61 63 74 69 76 65 d. (Using active
3290: 20 66 6f 73 73 69 6c 20 72 65 70 6f 73 69 74 6f fossil reposito
32a0: 72 79 2e 29 0a 20 2a 0a 20 2a 20 40 70 61 72 61 ry.). *. * @para
32b0: 6d 20 20 73 74 72 69 6e 67 20 20 24 73 71 6c 20 m string $sql
32c0: 20 20 20 20 20 51 75 65 72 79 20 77 69 74 68 20 Query with
32d0: 70 6c 61 63 65 68 6f 6c 64 65 72 73 0a 20 2a 20 placeholders. *
32e0: 40 70 61 72 61 6d 20 20 61 72 72 61 79 20 20 20 @param array
32f0: 24 70 61 72 61 6d 73 20 20 20 42 6f 75 6e 64 20 $params Bound
3300: 70 61 72 61 6d 65 74 65 72 73 0a 20 2a 20 40 70 parameters. * @p
3310: 61 72 61 6d 20 20 62 6f 6f 6c 20 20 20 20 24 66 aram bool $f
3320: 65 74 63 68 20 20 20 20 49 6d 6d 65 64 69 61 74 etch Immediat
3330: 65 20 2d 3e 66 65 74 63 68 41 6c 6c 28 29 0a 20 e ->fetchAll().
3340: 2a 20 40 72 65 74 75 72 6e 20 61 72 72 61 79 7c * @return array|
3350: 50 44 4f 53 74 61 74 65 6d 65 6e 74 7c 50 44 4f PDOStatement|PDO
3360: 0a 20 2a 2f 0a 66 75 6e 63 74 69 6f 6e 20 64 62 . */.function db
3370: 28 24 73 71 6c 3d 22 22 2c 20 24 70 61 72 61 6d ($sql="", $param
3380: 73 3d 5b 5d 2c 20 24 66 65 74 63 68 3d 54 52 55 s=[], $fetch=TRU
3390: 45 29 20 7b 0a 20 20 20 20 73 74 61 74 69 63 20 E) {. static
33a0: 24 64 62 3b 0a 20 20 20 20 67 6c 6f 62 61 6c 20 $db;. global
33b0: 24 63 66 67 3b 0a 20 20 20 20 69 66 20 28 65 6d $cfg;. if (em
33c0: 70 74 79 28 24 64 62 29 29 20 7b 0a 20 20 20 20 pty($db)) {.
33d0: 20 20 20 20 69 66 20 28 21 70 72 65 67 5f 6d 61 if (!preg_ma
33e0: 74 63 68 28 22 7e 5e 2f 5c 77 5b 2f 5c 77 2e 2d tch("~^/\w[/\w.-
33f0: 5d 2b 5c 77 5c 2e 28 66 73 3f 6c 3f 7c 66 6f 73 ]+\w\.(fs?l?|fos
3400: 73 69 6c 7c 73 71 6c 69 74 65 29 24 7e 22 2c 20 sil|sqlite)$~",
3410: 24 63 66 67 5b 22 72 65 70 6f 22 5d 29 29 20 7b $cfg["repo"])) {
3420: 0a 20 20 20 20 20 20 20 20 20 20 20 20 64 69 65 . die
3430: 28 22 64 62 28 29 3a 20 46 4f 53 53 49 4c 5f 52 ("db(): FOSSIL_R
3440: 45 50 4f 53 49 54 4f 52 59 20 64 6f 65 73 6e 27 EPOSITORY doesn'
3450: 74 20 6c 6f 6f 6b 20 72 69 67 68 74 2e 20 41 62 t look right. Ab
3460: 6f 72 74 2e 22 29 3b 0a 20 20 20 20 20 20 20 20 ort.");.
3470: 7d 20 0a 20 20 20 20 20 20 20 20 23 24 64 62 20 } . #$db
3480: 3d 20 6e 65 77 20 50 44 4f 28 22 73 71 6c 69 74 = new PDO("sqlit
3490: 65 3a 3a 6d 65 6d 6f 72 79 3a 22 29 3b 0a 20 20 e::memory:");.
34a0: 20 20 20 20 20 20 24 64 62 20 3d 20 6e 65 77 20 $db = new
34b0: 50 44 4f 28 22 73 71 6c 69 74 65 3a 24 63 66 67 PDO("sqlite:$cfg
34c0: 5b 72 65 70 6f 5d 22 29 3b 0a 20 20 20 20 20 20 [repo]");.
34d0: 20 20 24 64 62 2d 3e 73 65 74 41 74 74 72 69 62 $db->setAttrib
34e0: 75 74 65 28 50 44 4f 3a 3a 41 54 54 52 5f 45 52 ute(PDO::ATTR_ER
34f0: 52 4d 4f 44 45 2c 20 50 44 4f 3a 3a 45 52 52 4d RMODE, PDO::ERRM
3500: 4f 44 45 5f 57 41 52 4e 49 4e 47 29 3b 0a 20 20 ODE_WARNING);.
3510: 20 20 7d 0a 20 20 20 20 69 66 20 28 24 70 61 72 }. if ($par
3520: 61 6d 73 29 20 7b 0a 20 20 20 20 20 20 20 20 24 ams) {. $
3530: 73 74 6d 74 20 3d 20 24 64 62 2d 3e 70 72 65 70 stmt = $db->prep
3540: 61 72 65 28 24 73 71 6c 29 3b 0a 20 20 20 20 20 are($sql);.
3550: 20 20 20 24 73 74 6d 74 2d 3e 65 78 65 63 75 74 $stmt->execut
3560: 65 28 24 70 61 72 61 6d 73 29 3b 0a 20 20 20 20 e($params);.
3570: 20 20 20 20 72 65 74 75 72 6e 20 24 66 65 74 63 return $fetc
3580: 68 20 3f 20 24 73 74 6d 74 2d 3e 66 65 74 63 68 h ? $stmt->fetch
3590: 41 6c 6c 28 50 44 4f 3a 3a 46 45 54 43 48 5f 41 All(PDO::FETCH_A
35a0: 53 53 4f 43 29 20 3a 20 24 73 74 6d 74 3b 0a 20 SSOC) : $stmt;.
35b0: 20 20 20 7d 0a 20 20 20 20 65 6c 73 65 69 66 20 }. elseif
35c0: 28 24 73 71 6c 29 20 7b 0a 20 20 20 20 20 20 20 ($sql) {.
35d0: 20 72 65 74 75 72 6e 20 24 64 62 2d 3e 71 75 65 return $db->que
35e0: 72 79 28 24 73 71 6c 29 2d 3e 66 65 74 63 68 41 ry($sql)->fetchA
35f0: 6c 6c 28 50 44 4f 3a 3a 46 45 54 43 48 5f 41 53 ll(PDO::FETCH_AS
3600: 53 4f 43 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 SOC);. }.
3610: 65 6c 73 65 20 7b 0a 20 20 20 20 20 20 20 20 72 else {. r
3620: 65 74 75 72 6e 20 24 64 62 3b 0a 20 20 20 20 7d eturn $db;. }
3630: 0a 7d 0a 0a 2f 2a 2a 0a 20 2a 20 51 75 65 72 79 .}../**. * Query
3640: 20 66 6f 73 73 69 6c 20 60 63 6f 6e 66 69 67 60 fossil `config`
3650: 20 74 61 62 6c 65 2e 0a 20 2a 0a 20 2a 20 40 70 table.. *. * @p
3660: 61 72 61 6d 20 20 73 74 72 69 6e 67 20 20 24 6e aram string $n
3670: 61 6d 65 20 20 20 20 20 4f 70 74 69 6f 6e 0a 20 ame Option.
3680: 2a 20 40 70 61 72 61 6d 20 20 61 72 72 61 79 20 * @param array
3690: 20 20 24 64 65 66 61 75 6c 74 20 20 46 61 6c 6c $default Fall
36a0: 62 61 63 6b 0a 20 2a 20 40 72 65 74 75 72 6e 20 back. * @return
36b0: 73 74 72 69 6e 67 0a 20 2a 2f 0a 66 75 6e 63 74 string. */.funct
36c0: 69 6f 6e 20 67 65 74 5f 63 6f 6e 66 69 67 28 24 ion get_config($
36d0: 6e 61 6d 65 2c 20 24 64 65 66 61 75 6c 74 3d 22 name, $default="
36e0: 22 29 20 7b 0a 20 20 20 20 24 72 20 3d 20 64 62 ") {. $r = db
36f0: 28 22 53 45 4c 45 43 54 20 76 61 6c 75 65 20 46 ("SELECT value F
3700: 52 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45 52 45 ROM config WHERE
3710: 20 6e 61 6d 65 3d 3f 22 2c 20 5b 24 6e 61 6d 65 name=?", [$name
3720: 5d 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 24 ]);. return $
3730: 72 20 3f 20 24 72 5b 30 5d 5b 22 76 61 6c 75 65 r ? $r[0]["value
3740: 22 5d 20 3a 20 24 64 65 66 61 75 6c 74 3b 0a 7d "] : $default;.}
3750: 0a 0a 0a 0a 23 2d 2d 20 66 69 6e 64 20 70 75 62 ....#-- find pub
3760: 6c 69 63 20 61 63 63 65 73 73 20 75 72 6c 20 28 lic access url (
3770: 6f 72 20 6d 6f 73 74 20 70 72 6f 62 61 62 6c 65 or most probable
3780: 20 61 74 20 6c 65 61 73 74 29 0a 66 75 6e 63 74 at least).funct
3790: 69 6f 6e 20 67 65 74 5f 62 61 73 65 75 72 6c 28 ion get_baseurl(
37a0: 29 20 7b 0a 20 20 20 20 24 75 72 6c 73 20 3d 20 ) {. $urls =
37b0: 61 72 72 61 79 5f 63 6f 6c 75 6d 6e 28 64 62 28 array_column(db(
37c0: 22 53 45 4c 45 43 54 20 53 55 42 53 54 52 28 6e "SELECT SUBSTR(n
37d0: 61 6d 65 2c 39 2c 32 30 30 29 20 41 53 20 75 72 ame,9,200) AS ur
37e0: 6c 20 46 52 4f 4d 20 63 6f 6e 66 69 67 20 57 48 l FROM config WH
37f0: 45 52 45 20 6e 61 6d 65 20 4c 49 4b 45 20 27 62 ERE name LIKE 'b
3800: 61 73 65 75 72 6c 3a 25 27 22 29 2c 20 22 75 72 aseurl:%'"), "ur
3810: 6c 22 29 3b 0a 20 20 20 20 69 66 20 28 24 62 65 l");. if ($be
3820: 73 74 20 3d 20 70 72 65 67 5f 67 72 65 70 28 22 st = preg_grep("
3830: 7e 2f 2f 31 32 37 5c 2e 7c 2f 2f 6c 6f 63 61 6c ~//127\.|//local
3840: 68 6f 73 74 7c 3a 5c 64 2b 2f 7e 69 22 2c 20 24 host|:\d+/~i", $
3850: 75 72 6c 73 2c 20 50 52 45 47 5f 47 52 45 50 5f urls, PREG_GREP_
3860: 49 4e 56 45 52 54 29 29 20 7b 0a 20 20 20 20 20 INVERT)) {.
3870: 20 20 20 72 65 74 75 72 6e 20 61 72 72 61 79 5f return array_
3880: 76 61 6c 75 65 73 28 24 62 65 73 74 29 5b 30 5d values($best)[0]
3890: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 65 6c 73 65 ;. }. else
38a0: 69 66 20 28 24 62 65 73 74 20 3d 20 70 72 65 67 if ($best = preg
38b0: 5f 67 72 65 70 28 22 7e 2f 2f 31 32 37 5c 2e 7c _grep("~//127\.|
38c0: 2f 2f 6c 6f 63 61 6c 68 6f 73 74 7e 69 22 2c 20 //localhost~i",
38d0: 24 75 72 6c 73 2c 20 50 52 45 47 5f 47 52 45 50 $urls, PREG_GREP
38e0: 5f 49 4e 56 45 52 54 29 29 20 7b 0a 20 20 20 20 _INVERT)) {.
38f0: 20 20 20 20 72 65 74 75 72 6e 20 61 72 72 61 79 return array
3900: 5f 76 61 6c 75 65 73 28 24 62 65 73 74 29 5b 30 _values($best)[0
3910: 5d 3b 0a 20 20 20 20 7d 0a 20 20 20 20 2f 2f 20 ];. }. //
3920: 63 6f 75 6c 64 20 61 6c 74 65 72 6e 61 74 69 76 could alternativ
3930: 65 6c 79 20 74 72 79 20 73 79 6e 63 2d 77 69 74 ely try sync-wit
3940: 68 3a 2a 2c 20 62 75 74 20 74 68 61 74 20 6d 69 h:*, but that mi
3950: 67 68 74 20 6c 65 61 6b 20 73 65 6e 73 69 74 69 ght leak sensiti
3960: 76 65 20 70 65 65 72 73 0a 20 20 20 20 65 6c 73 ve peers. els
3970: 65 20 7b 0a 20 20 20 20 20 20 20 20 72 65 74 75 e {. retu
3980: 72 6e 20 24 75 72 6c 73 5b 30 5d 3b 0a 20 20 20 rn $urls[0];.
3990: 20 7d 0a 7d 0a 0a 23 2d 2d 20 61 72 74 69 66 61 }.}..#-- artifa
39a0: 63 74 20 6f 77 6e 65 72 0a 66 75 6e 63 74 69 6f ct owner.functio
39b0: 6e 20 67 65 74 5f 75 73 65 72 28 24 75 75 69 64 n get_user($uuid
39c0: 29 20 7b 0a 20 20 20 20 24 72 20 3d 20 64 62 28 ) {. $r = db(
39d0: 22 0a 20 20 20 20 20 20 20 20 53 45 4c 45 43 54 ". SELECT
39e0: 20 6c 6f 67 69 6e 2c 20 73 69 7a 65 0a 20 20 20 login, size.
39f0: 20 20 20 20 20 20 20 46 52 4f 4d 20 62 6c 6f 62 FROM blob
3a00: 0a 20 20 20 20 20 20 20 20 20 20 4c 45 46 54 20 . LEFT
3a10: 4a 4f 49 4e 20 72 63 76 66 72 6f 6d 20 4f 4e 20 JOIN rcvfrom ON
3a20: 62 6c 6f 62 2e 72 63 76 69 64 3d 72 63 76 66 72 blob.rcvid=rcvfr
3a30: 6f 6d 2e 72 63 76 69 64 0a 20 20 20 20 20 20 20 om.rcvid.
3a40: 20 20 20 4c 45 46 54 20 4a 4f 49 4e 20 75 73 65 LEFT JOIN use
3a50: 72 20 4f 4e 20 75 73 65 72 2e 75 69 64 3d 72 63 r ON user.uid=rc
3a60: 76 66 72 6f 6d 2e 75 69 64 0a 20 20 20 20 20 20 vfrom.uid.
3a70: 20 20 20 57 48 45 52 45 20 75 75 69 64 20 3d 20 WHERE uuid =
3a80: 3f 22 2c 0a 20 20 20 20 20 20 20 20 5b 24 75 75 ?",. [$uu
3a90: 69 64 5d 0a 20 20 20 20 29 3b 0a 20 20 20 20 72 id]. );. r
3aa0: 65 74 75 72 6e 20 24 72 20 3f 20 24 72 5b 30 5d eturn $r ? $r[0]
3ab0: 5b 22 6c 6f 67 69 6e 22 5d 20 3a 20 6e 75 6c 6c ["login"] : null
3ac0: 3b 0a 7d 0a 0a 23 2d 2d 20 70 72 69 6d 61 72 79 ;.}..#-- primary
3ad0: 20 75 73 65 72 0a 66 75 6e 63 74 69 6f 6e 20 67 user.function g
3ae0: 65 74 5f 6d 61 69 6e 5f 75 73 65 72 28 29 20 7b et_main_user() {
3af0: 0a 20 20 20 20 72 65 74 75 72 6e 20 64 62 28 22 . return db("
3b00: 0a 20 20 20 20 20 20 20 20 53 45 4c 45 43 54 20 . SELECT
3b10: 75 73 65 72 2c 20 43 4f 55 4e 54 28 74 79 70 65 user, COUNT(type
3b20: 29 20 41 53 20 63 6e 74 0a 20 20 20 20 20 20 20 ) AS cnt.
3b30: 20 20 20 46 52 4f 4d 20 65 76 65 6e 74 0a 20 20 FROM event.
3b40: 20 20 20 20 20 20 20 57 48 45 52 45 20 74 79 70 WHERE typ
3b50: 65 3d 27 63 69 27 0a 20 20 20 20 20 20 20 20 20 e='ci'.
3b60: 47 52 4f 55 50 20 42 59 20 75 73 65 72 0a 20 20 GROUP BY user.
3b70: 20 20 20 20 20 20 20 4f 52 44 45 52 20 42 59 20 ORDER BY
3b80: 63 6e 74 20 44 45 53 43 22 0a 20 20 20 20 29 5b cnt DESC". )[
3b90: 30 5d 5b 22 75 73 65 72 22 5d 3b 0a 7d 0a 0a 23 0]["user"];.}..#
3ba0: 2d 2d 20 62 61 73 65 6e 61 6d 65 2e 66 6f 73 73 -- basename.foss
3bb0: 69 6c 0a 66 75 6e 63 74 69 6f 6e 20 67 65 74 5f il.function get_
3bc0: 62 61 73 65 6e 61 6d 65 28 29 20 7b 0a 20 20 20 basename() {.
3bd0: 20 67 6c 6f 62 61 6c 20 24 63 66 67 3b 0a 20 20 global $cfg;.
3be0: 20 20 72 65 74 75 72 6e 20 70 72 65 67 5f 72 65 return preg_re
3bf0: 70 6c 61 63 65 28 22 2f 5c 2e 5c 77 2b 24 2f 22 place("/\.\w+$/"
3c00: 2c 20 22 22 2c 20 62 61 73 65 6e 61 6d 65 28 24 , "", basename($
3c10: 63 66 67 5b 22 72 65 70 6f 22 5d 29 29 3b 0a 7d cfg["repo"]));.}
3c20: 0a 0a 23 2d 2d 20 73 70 6c 69 74 20 53 54 44 49 ..#-- split STDI
3c30: 4e 20 69 6e 74 6f 20 72 6f 77 73 0a 66 75 6e 63 N into rows.func
3c40: 74 69 6f 6e 20 67 65 74 5f 61 72 74 69 66 61 63 tion get_artifac
3c50: 74 73 28 24 73 74 64 69 6e 29 20 7b 0a 20 20 20 ts($stdin) {.
3c60: 20 70 72 65 67 5f 6d 61 74 63 68 5f 61 6c 6c 28 preg_match_all(
3c70: 22 2f 5e 28 5c 77 2b 29 5c 73 2b 28 5b 5c 77 2d "/^(\w+)\s+([\w-
3c80: 5d 2b 29 28 3f 3a 5c 73 2b 28 2e 2b 29 29 3f 24 ]+)(?:\s+(.+))?$
3c90: 2f 6d 22 2c 20 24 73 74 64 69 6e 2c 20 24 72 6f /m", $stdin, $ro
3ca0: 77 73 2c 20 50 52 45 47 5f 53 45 54 5f 4f 52 44 ws, PREG_SET_ORD
3cb0: 45 52 29 3b 0a 20 20 20 20 24 72 6f 77 73 20 3d ER);. $rows =
3cc0: 20 61 72 72 61 79 5f 6d 61 70 28 0a 20 20 20 20 array_map(.
3cd0: 20 20 20 20 66 75 6e 63 74 69 6f 6e 28 24 72 6f function($ro
3ce0: 77 29 20 7b 0a 20 20 20 20 20 20 20 20 20 20 20 w) {.
3cf0: 20 72 65 74 75 72 6e 20 5b 0a 20 20 20 20 20 20 return [.
3d00: 20 20 20 20 20 20 20 20 20 20 22 75 75 69 64 22 "uuid"
3d10: 20 3d 3e 20 24 72 6f 77 5b 31 5d 2c 0a 20 20 20 => $row[1],.
3d20: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 74 79 "ty
3d30: 70 65 22 20 3d 3e 20 24 72 6f 77 5b 32 5d 2c 0a pe" => $row[2],.
3d40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3d50: 22 63 6f 6d 6d 65 6e 74 22 20 3d 3e 20 24 72 6f "comment" => $ro
3d60: 77 5b 33 5d 2c 0a 20 20 20 20 20 20 20 20 20 20 w[3],.
3d70: 20 20 5d 3b 0a 20 20 20 20 20 20 20 20 7d 2c 0a ];. },.
3d80: 20 20 20 20 20 20 20 20 24 72 6f 77 73 0a 20 20 $rows.
3d90: 20 20 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 );. return
3da0: 24 72 6f 77 73 3b 0a 7d 0a 0a 23 2d 2d 20 74 75 $rows;.}..#-- tu
3db0: 72 6e 20 75 75 69 64 20 69 6e 74 6f 20 61 70 70 rn uuid into app
3dc0: 72 6f 70 72 69 61 74 65 20 75 72 6c 0a 66 75 6e ropriate url.fun
3dd0: 63 74 69 6f 6e 20 65 78 70 61 6e 64 5f 61 72 74 ction expand_art
3de0: 69 66 61 63 74 28 24 72 6f 77 2c 20 24 75 72 6c ifact($row, $url
3df0: 2c 20 24 71 3d 22 75 72 6c 65 6e 63 6f 64 65 22 , $q="urlencode"
3e00: 29 20 7b 0a 20 20 20 20 67 6c 6f 62 61 6c 20 24 ) {. global $
3e10: 63 66 67 3b 0a 20 20 20 20 73 77 69 74 63 68 20 cfg;. switch
3e20: 28 24 72 6f 77 5b 22 74 79 70 65 22 5d 29 20 7b ($row["type"]) {
3e30: 0a 20 20 20 20 20 20 20 20 63 61 73 65 20 22 61 . case "a
3e40: 74 74 61 63 68 6d 65 6e 74 22 3a 0a 20 20 20 20 ttachment":.
3e50: 20 20 20 20 63 61 73 65 20 22 66 69 6c 65 22 3a case "file":
3e60: 0a 20 20 20 20 20 20 20 20 20 20 20 20 24 72 6f . $ro
3e70: 77 5b 22 6e 61 6d 65 22 5d 20 3d 20 24 72 6f 77 w["name"] = $row
3e80: 5b 22 63 6f 6d 6d 65 6e 74 22 5d 3b 0a 20 20 20 ["comment"];.
3e90: 20 20 20 20 20 20 20 20 20 24 72 6f 77 5b 22 75 $row["u
3ea0: 72 6c 5f 72 61 77 22 5d 20 3d 20 22 24 75 72 6c rl_raw"] = "$url
3eb0: 2f 72 61 77 2f 24 72 6f 77 5b 75 75 69 64 5d 3f /raw/$row[uuid]?
3ec0: 61 74 3d 7b 24 71 28 24 72 6f 77 5b 27 6e 61 6d at={$q($row['nam
3ed0: 65 27 5d 29 7d 22 3b 0a 20 20 20 20 20 20 20 20 e'])}";.
3ee0: 20 20 20 20 24 72 6f 77 5b 22 75 72 6c 5f 6a 73 $row["url_js
3ef0: 6f 6e 22 5d 20 3d 20 22 24 75 72 6c 2f 6a 73 6f on"] = "$url/jso
3f00: 6e 2f 61 72 74 69 66 61 63 74 2f 7b 24 71 28 24 n/artifact/{$q($
3f10: 72 6f 77 5b 27 75 75 69 64 27 5d 29 7d 22 3b 0a row['uuid'])}";.
3f20: 20 20 20 20 20 20 20 20 20 20 20 20 24 72 6f 77 $row
3f30: 5b 22 75 72 6c 5f 66 69 6e 66 6f 22 5d 20 3d 20 ["url_finfo"] =
3f40: 22 24 75 72 6c 2f 6a 73 6f 6e 2f 66 69 6e 66 6f "$url/json/finfo
3f50: 3f 6e 61 6d 65 3d 7b 24 71 28 24 72 6f 77 5b 27 ?name={$q($row['
3f60: 6e 61 6d 65 27 5d 29 7d 22 3b 0a 20 20 20 20 20 name'])}";.
3f70: 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 break;.
3f80: 20 20 20 20 20 20 63 61 73 65 20 22 77 69 6b 69 case "wiki
3f90: 22 3a 0a 20 20 20 20 20 20 20 20 20 20 20 20 24 ":. $
3fa0: 72 6f 77 5b 22 6e 61 6d 65 22 5d 20 3d 20 74 72 row["name"] = tr
3fb0: 69 6d 28 24 72 6f 77 5b 22 63 6f 6d 6d 65 6e 74 im($row["comment
3fc0: 22 5d 2c 20 27 22 27 29 3b 0a 20 20 20 20 20 20 "], '"');.
3fd0: 20 20 20 20 20 20 69 66 20 28 70 72 65 67 5f 6d if (preg_m
3fe0: 61 74 63 68 28 27 2f 5e 22 28 2e 2b 29 22 24 2f atch('/^"(.+)"$/
3ff0: 27 2c 20 24 72 6f 77 5b 22 63 6f 6d 6d 65 6e 74 ', $row["comment
4000: 22 5d 2c 20 24 75 75 29 29 20 7b 0a 20 20 20 20 "], $uu)) {.
4010: 20 20 20 20 20 20 20 20 20 20 20 20 24 72 6f 77 $row
4020: 5b 22 6e 61 6d 65 22 5d 20 3d 20 24 75 75 5b 31 ["name"] = $uu[1
4030: 5d 3b 20 20 2f 2f 20 6d 6f 72 65 20 65 78 61 63 ]; // more exac
4040: 74 20 71 75 6f 74 65 20 74 72 69 6d 6d 69 6e 67 t quote trimming
4050: 0a 20 20 20 20 20 20 20 20 20 20 20 20 7d 0a 20 . }.
4060: 20 20 20 20 20 20 20 20 20 20 20 24 72 6f 77 5b $row[
4070: 22 75 72 6c 5f 72 61 77 22 5d 20 3d 20 22 24 75 "url_raw"] = "$u
4080: 72 6c 2f 72 61 77 2f 7b 24 71 28 24 72 6f 77 5b rl/raw/{$q($row[
4090: 27 75 75 69 64 27 5d 29 7d 3f 61 74 3d 7b 24 71 'uuid'])}?at={$q
40a0: 28 24 72 6f 77 5b 27 75 75 69 64 27 5d 29 7d 22 ($row['uuid'])}"
40b0: 3b 20 20 23 20 45 52 52 3a 20 74 68 69 73 20 73 ; # ERR: this s
40c0: 74 69 6c 6c 20 63 6f 6e 74 61 69 6e 73 20 74 68 till contains th
40d0: 65 20 61 72 74 69 66 61 63 74 20 68 65 61 64 65 e artifact heade
40e0: 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 24 72 r. $r
40f0: 6f 77 5b 22 75 72 6c 5f 6a 73 6f 6e 22 5d 20 3d ow["url_json"] =
4100: 20 22 24 75 72 6c 2f 6a 73 6f 6e 2f 77 69 6b 69 "$url/json/wiki
4110: 2f 67 65 74 2f 7b 24 71 28 24 72 6f 77 5b 27 6e /get/{$q($row['n
4120: 61 6d 65 27 5d 29 7d 22 3b 0a 20 20 20 20 20 20 ame'])}";.
4130: 20 20 20 20 20 20 24 72 6f 77 5b 22 75 72 6c 5f $row["url_
4140: 77 65 62 22 5d 20 3d 20 22 24 75 72 6c 2f 77 69 web"] = "$url/wi
4150: 6b 69 2f 7b 24 71 28 24 72 6f 77 5b 27 6e 61 6d ki/{$q($row['nam
4160: 65 27 5d 29 7d 22 3b 0a 20 20 20 20 20 20 20 20 e'])}";.
4170: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 break;.
4180: 20 20 20 63 61 73 65 20 22 63 68 65 63 6b 2d 69 case "check-i
4190: 6e 22 3a 0a 20 20 20 20 20 20 20 20 20 20 20 20 n":.
41a0: 24 72 6f 77 5b 22 75 72 6c 5f 6a 73 6f 6e 22 5d $row["url_json"]
41b0: 20 3d 20 22 24 75 72 6c 2f 6a 73 6f 6e 2f 61 72 = "$url/json/ar
41c0: 74 69 66 61 63 74 2f 7b 24 71 28 24 72 6f 77 5b tifact/{$q($row[
41d0: 27 75 75 69 64 27 5d 29 7d 22 3b 0a 20 20 20 20 'uuid'])}";.
41e0: 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 break;.
41f0: 20 20 20 20 20 20 20 63 61 73 65 20 22 61 74 74 case "att
4200: 61 63 68 6d 65 6e 74 2d 63 6f 6e 74 72 6f 6c 22 achment-control"
4210: 3a 0a 20 20 20 20 20 20 20 20 63 61 73 65 20 22 :. case "
4220: 74 61 67 22 3a 0a 20 20 20 20 20 20 20 20 63 61 tag":. ca
4230: 73 65 20 22 72 65 66 65 72 65 6e 63 65 64 22 3a se "referenced":
4240: 0a 20 20 20 20 20 20 20 20 64 65 66 61 75 6c 74 . default
4250: 3a 0a 20 20 20 20 20 20 20 20 20 20 20 20 62 72 :. br
4260: 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 24 eak;. }. $
4270: 63 66 67 5b 22 75 73 65 72 22 5d 20 3d 20 24 72 cfg["user"] = $r
4280: 6f 77 5b 22 75 73 65 72 22 5d 20 3d 20 67 65 74 ow["user"] = get
4290: 5f 75 73 65 72 28 24 72 6f 77 5b 22 75 75 69 64 _user($row["uuid
42a0: 22 5d 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 "]);. return
42b0: 24 72 6f 77 3b 0a 7d 0a 0a 23 2d 2d 20 63 68 65 $row;.}..#-- che
42c0: 63 6b 2d 69 6e 20 6f 72 20 66 69 6c 65 2c 20 6f ck-in or file, o
42d0: 72 20 6f 74 68 65 72 20 61 72 74 69 66 61 63 74 r other artifact
42e0: 20 74 79 70 65 73 0a 66 75 6e 63 74 69 6f 6e 20 types.function
42f0: 6d 61 69 6e 5f 61 63 74 69 6f 6e 28 24 73 74 64 main_action($std
4300: 69 6e 29 20 7b 0a 20 20 20 20 66 6f 72 65 61 63 in) {. foreac
4310: 68 20 28 5b 22 63 68 65 63 6b 2d 69 6e 22 2c 20 h (["check-in",
4320: 22 66 69 6c 65 22 2c 20 22 61 74 74 61 63 68 6d "file", "attachm
4330: 65 6e 74 22 2c 20 22 77 69 6b 69 22 2c 20 22 72 ent", "wiki", "r
4340: 65 66 65 72 65 6e 63 65 64 22 2c 20 22 74 61 67 eferenced", "tag
4350: 22 5d 20 61 73 20 24 74 29 20 7b 0a 20 20 20 20 "] as $t) {.
4360: 20 20 20 20 69 66 20 28 70 72 65 67 5f 6d 61 74 if (preg_mat
4370: 63 68 28 22 2f 5e 5c 77 2b 5c 73 24 74 5c 5c 62 ch("/^\w+\s$t\\b
4380: 2f 6d 22 2c 20 24 73 74 64 69 6e 29 29 20 7b 0a /m", $stdin)) {.
4390: 20 20 20 20 20 20 20 20 20 20 20 20 72 65 74 75 retu
43a0: 72 6e 20 24 74 3b 0a 20 20 20 20 20 20 20 20 7d rn $t;. }
43b0: 0a 20 20 20 20 7d 0a 20 20 20 20 72 65 74 75 72 . }. retur
43c0: 6e 20 22 61 66 74 65 72 2d 72 65 63 65 69 76 65 n "after-receive
43d0: 22 3b 0a 7d 0a 0a 23 2d 2d 20 64 61 74 65 74 69 ";.}..#-- dateti
43e0: 6d 65 20 66 6f 72 6d 61 74 0a 66 75 6e 63 74 69 me format.functi
43f0: 6f 6e 20 69 73 6f 38 36 30 31 28 24 74 29 20 7b on iso8601($t) {
4400: 0a 20 20 20 20 72 65 74 75 72 6e 20 73 74 72 66 . return strf
4410: 74 69 6d 65 28 22 25 59 2d 25 6d 2d 25 64 54 25 time("%Y-%m-%dT%
4420: 48 3a 25 4d 3a 25 53 5a 22 2c 20 24 74 29 3b 0a H:%M:%SZ", $t);.
4430: 7d 0a 0a 23 2d 2d 20 67 65 74 20 65 61 72 6c 69 }..#-- get earli
4440: 65 73 74 20 6f 72 20 6c 61 73 74 20 60 65 76 65 est or last `eve
4450: 6e 74 60 20 74 69 6d 65 73 74 61 6d 70 0a 66 75 nt` timestamp.fu
4460: 6e 63 74 69 6f 6e 20 6d 74 69 6d 65 5f 65 76 65 nction mtime_eve
4470: 6e 74 28 24 46 4e 3d 22 4d 49 4e 22 2c 20 24 57 nt($FN="MIN", $W
4480: 48 45 52 45 3d 22 22 29 20 7b 0a 20 20 20 20 72 HERE="") {. r
4490: 65 74 75 72 6e 20 64 62 28 22 53 45 4c 45 43 54 eturn db("SELECT
44a0: 20 73 74 72 66 74 69 6d 65 28 27 25 73 27 2c 20 strftime('%s',
44b0: 24 46 4e 28 6d 74 69 6d 65 29 29 20 41 53 20 64 $FN(mtime)) AS d
44c0: 74 20 46 52 4f 4d 20 65 76 65 6e 74 20 24 57 48 t FROM event $WH
44d0: 45 52 45 20 4c 49 4d 49 54 20 31 22 29 5b 30 5d ERE LIMIT 1")[0]
44e0: 5b 22 64 74 22 5d 3b 0a 7d 0a 0a 23 2d 2d 20 74 ["dt"];.}..#-- t
44f0: 65 73 74 73 20 2d 2d 69 66 3a 74 79 70 65 20 6f ests --if:type o
4500: 72 20 2d 2d 69 66 3a 66 69 6c 65 6e 61 6d 65 20 r --if:filename
4510: 70 72 65 73 65 6e 63 65 20 69 6e 20 73 74 64 69 presence in stdi
4520: 6e 0a 66 75 6e 63 74 69 6f 6e 20 69 66 5f 63 68 n.function if_ch
4530: 65 63 6b 73 28 24 69 66 5f 6c 69 73 74 29 20 7b ecks($if_list) {
4540: 0a 20 20 20 20 67 6c 6f 62 61 6c 20 24 63 66 67 . global $cfg
4550: 3b 0a 20 20 20 20 66 6f 72 65 61 63 68 20 28 24 ;. foreach ($
4560: 69 66 5f 6c 69 73 74 20 61 73 20 24 69 66 29 20 if_list as $if)
4570: 7b 0a 20 20 20 20 20 20 20 20 70 72 65 67 5f 6d {. preg_m
4580: 61 74 63 68 28 22 2f 69 66 3a 28 2e 2b 29 2f 22 atch("/if:(.+)/"
4590: 2c 20 24 69 66 2c 20 24 69 66 29 20 61 6e 64 20 , $if, $if) and
45a0: 24 69 66 3d 24 69 66 5b 31 5d 3b 0a 20 20 20 20 $if=$if[1];.
45b0: 20 20 20 20 69 66 20 28 21 70 72 65 67 5f 6d 61 if (!preg_ma
45c0: 74 63 68 28 22 2f 5c 5c 62 24 69 66 5c 5c 62 2f tch("/\\b$if\\b/
45d0: 22 2c 20 24 63 66 67 5b 22 73 74 64 69 6e 22 5d ", $cfg["stdin"]
45e0: 29 29 20 7b 0a 20 20 20 20 20 20 20 20 20 20 20 )) {.
45f0: 20 64 69 65 28 22 2d 2d 69 66 3a 20 6e 6f 20 6d die("--if: no m
4600: 61 74 63 68 20 66 6f 72 20 27 24 69 66 27 22 29 atch for '$if'")
4610: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 ;. }.
4620: 7d 0a 7d 0a 0a 23 2d 2d 20 73 65 6c 65 63 74 20 }.}..#-- select
4630: 66 69 6c 65 6e 61 6d 65 20 65 78 74 65 6e 73 69 filename extensi
4640: 6f 6e 0a 66 75 6e 63 74 69 6f 6e 20 6c 61 6e 67 on.function lang
4650: 75 61 67 65 5f 63 6f 75 6e 74 28 24 65 78 74 3d uage_count($ext=
4660: 5b 5d 29 20 7b 0a 20 20 20 20 66 6f 72 65 61 63 []) {. foreac
4670: 68 20 28 64 62 28 22 53 45 4c 45 43 54 20 6e 61 h (db("SELECT na
4680: 6d 65 20 46 52 4f 4d 20 66 69 6c 65 6e 61 6d 65 me FROM filename
4690: 22 29 20 61 73 20 24 72 6f 77 29 20 7b 0a 20 20 ") as $row) {.
46a0: 20 20 20 20 20 20 69 66 20 28 70 72 65 67 5f 6d if (preg_m
46b0: 61 74 63 68 28 22 2f 5c 2e 28 5c 77 2b 29 24 2f atch("/\.(\w+)$/
46c0: 22 2c 20 24 72 6f 77 5b 22 6e 61 6d 65 22 5d 2c ", $row["name"],
46d0: 20 24 75 75 29 29 20 7b 0a 20 20 20 20 20 20 20 $uu)) {.
46e0: 20 20 20 20 20 40 24 65 78 74 5b 24 75 75 5b 31 @$ext[$uu[1
46f0: 5d 5d 20 2b 3d 20 31 3b 0a 20 20 20 20 20 20 20 ]] += 1;.
4700: 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 20 }. }. if
4710: 28 24 65 78 74 29 20 7b 0a 20 20 20 20 20 20 20 ($ext) {.
4720: 20 61 72 73 6f 72 74 28 24 65 78 74 29 3b 0a 20 arsort($ext);.
4730: 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 61 72 return ar
4740: 72 61 79 5f 6b 65 79 73 28 24 65 78 74 29 5b 30 ray_keys($ext)[0
4750: 5d 3b 0a 20 20 20 20 7d 0a 7d 0a 0a 3f 3e ];. }.}..?>