=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== sks-1.1.6+git20200620.9e9d504/eventloop.ml-155- in sks-1.1.6+git20200620.9e9d504/eventloop.ml:156: perror "Failed to listen on %s: %s" saddr (err_to_string err); sks-1.1.6+git20200620.9e9d504/eventloop.ml-157- None ############################################## sks-1.1.6+git20200620.9e9d504/membership.ml-44- sks-1.1.6+git20200620.9e9d504/membership.ml:45:let local_recon_addr () = sks-1.1.6+git20200620.9e9d504/membership.ml-46- lookup_hostname !Settings.hostname (string_of_int recon_port) ############################################## sks-1.1.6+git20200620.9e9d504/membership.ml-174- let same_addr thisaddr = same_inet_addr saddr thisaddr.Unix.ai_addr in sks-1.1.6+git20200620.9e9d504/membership.ml:175: if List.exists ~f:same_addr (local_recon_addr ()) then sks-1.1.6+git20200620.9e9d504/membership.ml-176- choose () else ############################################## sks-1.1.6+git20200620.9e9d504/membership.ml-185- List.exists (Array.to_list m) sks-1.1.6+git20200620.9e9d504/membership.ml:186: ~f:(fun x -> List.exists ~f:same_as_addr (fst x)) sks-1.1.6+git20200620.9e9d504/membership.ml-187- ############################################## sks-1.1.6+git20200620.9e9d504/script.ml-89- List.map ~f:Key.of_string sks-1.1.6+git20200620.9e9d504/script.ml:90: (get_keystrings_via_http addr (List.map ~f:KeyHash.dehexify hashes)) sks-1.1.6+git20200620.9e9d504/script.ml-91- ############################################## sks-1.1.6+git20200620.9e9d504/sks.pod-315-Disable sending of PKS mailsync messages. ONLY FOR STANDALONE SERVERS! sks-1.1.6+git20200620.9e9d504/sks.pod:316:THIS IS THE MECHANIASM FOR SENDING UPDATES TO NON-SKS SERVERS. sks-1.1.6+git20200620.9e9d504/sks.pod-317- ############################################## sks-1.1.6+git20200620.9e9d504/tester.ml-76- let words = Utils.extract_words string in sks-1.1.6+git20200620.9e9d504/tester.ml:77: let reply = send_msg addr (WordQuery words) in sks-1.1.6+git20200620.9e9d504/tester.ml-78- match reply.msg with ############################################## sks-1.1.6+git20200620.9e9d504/tester.ml-95-let get_log addr ts = sks-1.1.6+git20200620.9e9d504/tester.ml:96: let resp = send_msg addr (LogQuery ts) in sks-1.1.6+git20200620.9e9d504/tester.ml-97- match resp.msg with ############################################## sks-1.1.6+git20200620.9e9d504/debian/patches/0001-use-debian-fhs.patch-87- let membership_reload_time = ref (60. *. 60. *. 6.) sks-1.1.6+git20200620.9e9d504/debian/patches/0001-use-debian-fhs.patch:88:@@ -226,15 +226,15 @@ let get_from_addr () = sks-1.1.6+git20200620.9e9d504/debian/patches/0001-use-debian-fhs.patch-89- ############################################## sks-1.1.6+git20200620.9e9d504/debian/sks.init-32- pidfile=$1 sks-1.1.6+git20200620.9e9d504/debian/sks.init:33: pid=`cat $pidfile 2>/dev/null` || true sks-1.1.6+git20200620.9e9d504/debian/sks.init-34- sleep 1 ############################################## sks-1.1.6+git20200620.9e9d504/debian/sks.init-42- do sks-1.1.6+git20200620.9e9d504/debian/sks.init:43: cnt=`expr $cnt + 1` sks-1.1.6+git20200620.9e9d504/debian/sks.init-44- if [ $cnt -gt 30 ] ############################################## sks-1.1.6+git20200620.9e9d504/debian/sks.init-64- sks-1.1.6+git20200620.9e9d504/debian/sks.init:65: mkdir -p `dirname "$SKSDBPID"` sks-1.1.6+git20200620.9e9d504/debian/sks.init:66: chown debian-sks `dirname "$SKSDBPID"` sks-1.1.6+git20200620.9e9d504/debian/sks.init-67- ############################################## sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/common.ml-237- sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/common.ml:238:let get_client_recon_addr () = sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/common.ml-239- make_addr_list recon_address 0 ############################################## sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/common.ml-245- List.find ~f:(fun caddr -> family = Unix.domain_of_sockaddr caddr) sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/common.ml:246: (get_client_recon_addr ()) ############################################## sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/dbserver.ml-685- [ to_header; sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/dbserver.ml:686: "From", Settings.get_from_addr (); sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/dbserver.ml:687: "Reply-To", Settings.get_from_addr (); sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/dbserver.ml:688: "Errors-To", Settings.get_from_addr (); sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/dbserver.ml-689- "Subject","incremental"; ############################################## sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/dbserver.ml-691- "Content-type", "application/pgp-keys"; sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/dbserver.ml:692: "X-KeyServer-Sent", Settings.get_from_addr (); sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/dbserver.ml-693- ] ; ############################################## sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/settings.ml-216-let set_from_addr value = from_addr := Some value sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/settings.ml:217:let get_from_addr () = sks-1.1.6+git20200620.9e9d504/.pc/0001-use-debian-fhs.patch/settings.ml-218- match !from_addr with ############################################## sks-1.1.6+git20200620.9e9d504/common.ml-237- sks-1.1.6+git20200620.9e9d504/common.ml:238:let get_client_recon_addr () = sks-1.1.6+git20200620.9e9d504/common.ml-239- make_addr_list recon_address 0 ############################################## sks-1.1.6+git20200620.9e9d504/common.ml-245- List.find ~f:(fun caddr -> family = Unix.domain_of_sockaddr caddr) sks-1.1.6+git20200620.9e9d504/common.ml:246: (get_client_recon_addr ()) ############################################## sks-1.1.6+git20200620.9e9d504/dbserver.ml-685- [ to_header; sks-1.1.6+git20200620.9e9d504/dbserver.ml:686: "From", Settings.get_from_addr (); sks-1.1.6+git20200620.9e9d504/dbserver.ml:687: "Reply-To", Settings.get_from_addr (); sks-1.1.6+git20200620.9e9d504/dbserver.ml:688: "Errors-To", Settings.get_from_addr (); sks-1.1.6+git20200620.9e9d504/dbserver.ml-689- "Subject","incremental"; ############################################## sks-1.1.6+git20200620.9e9d504/dbserver.ml-691- "Content-type", "application/pgp-keys"; sks-1.1.6+git20200620.9e9d504/dbserver.ml:692: "X-KeyServer-Sent", Settings.get_from_addr (); sks-1.1.6+git20200620.9e9d504/dbserver.ml-693- ] ; ############################################## sks-1.1.6+git20200620.9e9d504/settings.ml-216-let set_from_addr value = from_addr := Some value sks-1.1.6+git20200620.9e9d504/settings.ml:217:let get_from_addr () = sks-1.1.6+git20200620.9e9d504/settings.ml-218- match !from_addr with