guns

From self[at]sungpae.com Mon Nov  8 16:59:48 2021
Date: Mon, 8 Nov 2021 16:59:48 -0600
From: Sung Pae <self[at]sungpae.com>
To: [email protected]
Subject: Permissive forwarding rule leads to unintentional exposure of
 containers to external hosts
Message-ID: <YYmr4l1isfH9VQCn@SHANGRILA>
MIME-Version: 1.0
Content-Type: multipart/signed; micalg=pgp-sha256;
	protocol="application/pgp-signature"; boundary="QR1yLfEBO/zgxYVA"

guns

TRACE t48211: (frak/pattern ["450000949b3c40004006dfd10a000157d83adbc4e24001bb6c99f46fe29ceecf801805a0e4af00000101080a001779d76ecff667170303005b000000000000001debaf9409cffc8aba1c3c8ac9f24f172947d0b87d549535babe748f4f5c374343e583b3552bd6f9efb572b4cf063a9eb5295cbdc2ee20250d610463eda9b53657d1f0773b154f2793bbf1697258a595266f1c9c" "450000629b3d40004006e0020a000157d83adbc4e24001bb6c99f4cfe29ceecf801805a0402800000101080a001779d76ecff6671703030029000000000000001edf7a82c2ae09a6f2eb4b41d1c91342e907fac5afc261d1106120d204e31cdf6727" "45000062553500003406720bd83adbc40a00015701bbe240e29ceecf6c99f4fd8018023b099900000101080a6ed00a63001779d7170303002900000000000000a47495da1b255c5bf707d3c22424579f368eff46366b0745d39a181c4dd38e322a98" "4500007d55480000340671ddd83adbc40a00015701bbe240e29ceefd6c99f4fd8010023be1b600000101080a6ed00a85001779d7170303004400000000000000a52e5db0ead2180dd1f5cee35466b0f5e84de0e5de3b9f9852ba20489c7b42bc29805a9fa513fdebdd8d8f9da33ba7d63f297140ca223ecfbb6aca5c07"])

guns

(ns example
  (:require [clojure.java.io :as io])
  (:import (java.io FileInputStream)
           (javax.mail Session)
           (javax.mail.internet MimeMessage)))

;; Good
(defn ^MimeMessage message
  [file]
  (with-open [fis (FileInputStream. (io/file file))]

guns

(defn type-scaffold
  "https://gist.github.com/mpenet/2053633, originally by cgrand"
  [^Class cls]
  (let [ms (map (fn [^Method m]
                  [(.getDeclaringClass m)
                   (symbol (.getName m))
                   (map #(symbol (.getCanonicalName ^Class %)) (.getParameterTypes m))])
                (.getMethods cls))
        idecls (mapv (fn [[^Class cls ms]]
                       (let [decls (map (fn [[_ s ps]] (str (list s (into ['this] ps))))

guns

  ;; Any type of error class, as CLJS uses js/Error
  (defn e! [fmt & args]
    (throw (AssertionError. (apply format fmt args))))
  …
  ;; Exception message takes precedence over :validation-msg
  ["-i" "--input-directory DIR"
   :validate-fn #(cond (not (ok-path? %))
                       (e! "Input directory path %s is malformed" (pr-str %))

                       (let [f (File. %)]

guns

(ns bar
  (:refer-clojure :exclude [defn]))

(defmacro defn [& _])

guns

(ns minimum-edit-distance
  "A naive implementation of minimum edit distance in Clojure.

   From: https://www.stanford.edu/class/cs124/lec/med.pdf

   Initialization:

   D(i,0) = i
   D(0,j) = j

guns

diff --git a/gherkin b/gherkin
index 2567adf..aeb97e6 100755
--- a/gherkin
+++ b/gherkin
@@ -37,15 +37,12 @@ pb_get="^$"
 pb_unget="^$"
 
 readline() {
-  IFS=$'\n\b'
+  local IFS=$'\n\b'

guns

# Encrypt mail only to recipients with public keys
set my_cryptlist=`gpg --list-keys | ruby -e '\
    puts $stdin.read.scan(/<(.*?)>/)\
         .map { |(e)| "\\\\\\\\<%s\\\\\\\\>" % Regexp.escape(Regexp.escape(Regexp.escape(e))) }\
         .join("\\\\|")'`
send-hook ~A "set crypt_autoencrypt=no"
send-hook "~t ($my_cryptlist)" "set crypt_autoencrypt=yes"

guns

On Sun 25 Aug 2013 at 09:05:15PM -0500, gaz jones wrote:

> Hey, i am the current maintainer of tools.cli - i have very little
> time to make any changes to it at the moment (kids :) ). I'm not sure
> what the process is for adding you as a developer or transferring
> ownership etc but if I'm happy to do so as I have no further plans for
> working on it.

Hello Gareth,