Gecko [ 122.154.134.11 ]

Name	Size	Permission
auth-source.elc	5.49 KB	-rw-r--r--
canlock.elc	6.03 KB	-rw-r--r--
compface.elc	1.35 KB	-rw-r--r--
deuglify.elc	8.31 KB	-rw-r--r--
earcon.elc	5.67 KB	-rw-r--r--
ecomplete.elc	4.45 KB	-rw-r--r--
flow-fill.elc	4.57 KB	-rw-r--r--
gmm-utils.elc	7.68 KB	-rw-r--r--
gnus-agent.elc	122.37 KB	-rw-r--r--
gnus-art.elc	258.37 KB	-rw-r--r--
gnus-async.elc	12.09 KB	-rw-r--r--
gnus-audio.elc	2.48 KB	-rw-r--r--
gnus-bcklg.elc	3.67 KB	-rw-r--r--
gnus-bookmark.elc	24.54 KB	-rw-r--r--
gnus-cache.elc	26.11 KB	-rw-r--r--
gnus-cite.elc	27.6 KB	-rw-r--r--
gnus-cus.elc	38.4 KB	-rw-r--r--
gnus-delay.elc	4.98 KB	-rw-r--r--
gnus-demon.elc	8.65 KB	-rw-r--r--
gnus-diary.elc	9 KB	-rw-r--r--
gnus-dired.elc	6.56 KB	-rw-r--r--
gnus-draft.elc	10.7 KB	-rw-r--r--
gnus-dup.elc	4.77 KB	-rw-r--r--
gnus-eform.elc	3.68 KB	-rw-r--r--
gnus-ems.elc	7.21 KB	-rw-r--r--
gnus-fun.elc	8.91 KB	-rw-r--r--
gnus-group.elc	155.85 KB	-rw-r--r--
gnus-int.elc	51.53 KB	-rw-r--r--
gnus-kill.elc	18.37 KB	-rw-r--r--
gnus-logic.elc	5.2 KB	-rw-r--r--
gnus-mh.elc	2.89 KB	-rw-r--r--
gnus-ml.elc	5.22 KB	-rw-r--r--
gnus-mlspl.elc	6.37 KB	-rw-r--r--
gnus-move.elc	3.63 KB	-rw-r--r--
gnus-msg.elc	84.07 KB	-rw-r--r--
gnus-nocem.elc	12.08 KB	-rw-r--r--
gnus-picon.elc	8.63 KB	-rw-r--r--
gnus-range.elc	11.92 KB	-rw-r--r--
gnus-registry.elc	32.46 KB	-rw-r--r--
gnus-salt.elc	29.77 KB	-rw-r--r--
gnus-score.elc	76.25 KB	-rw-r--r--
gnus-setup.elc	5.01 KB	-rw-r--r--
gnus-sieve.elc	8.54 KB	-rw-r--r--
gnus-soup.elc	16.29 KB	-rw-r--r--
gnus-spec.elc	17 KB	-rw-r--r--
gnus-srvr.elc	43.88 KB	-rw-r--r--
gnus-start.elc	142.13 KB	-rw-r--r--
gnus-sum.elc	406.63 KB	-rw-r--r--
gnus-topic.elc	46.81 KB	-rw-r--r--
gnus-undo.elc	4.07 KB	-rw-r--r--
gnus-util.elc	48.22 KB	-rw-r--r--
gnus-uu.elc	57.87 KB	-rw-r--r--
gnus-vm.elc	2.63 KB	-rw-r--r--
gnus-win.elc	12.56 KB	-rw-r--r--
gnus.elc	158.49 KB	-rw-r--r--
html2text.elc	10.59 KB	-rw-r--r--
ietf-drums.elc	7.85 KB	-rw-r--r--
legacy-gnus-agent.elc	6.67 KB	-rw-r--r--
mail-parse.elc	2.44 KB	-rw-r--r--
mail-prsvr.elc	1.29 KB	-rw-r--r--
mail-source.elc	30.28 KB	-rw-r--r--
mailcap.elc	25.11 KB	-rw-r--r--
message.elc	223.29 KB	-rw-r--r--
messcompat.elc	2.83 KB	-rw-r--r--
mm-bodies.elc	6.06 KB	-rw-r--r--
mm-decode.elc	46.1 KB	-rw-r--r--
mm-encode.elc	5.96 KB	-rw-r--r--
mm-extern.elc	4.65 KB	-rw-r--r--
mm-partial.elc	3.44 KB	-rw-r--r--
mm-url.elc	9.94 KB	-rw-r--r--
mm-util.elc	39.83 KB	-rw-r--r--
mm-uu.elc	18.57 KB	-rw-r--r--
mm-view.elc	17.58 KB	-rw-r--r--
mml-sec.elc	12.58 KB	-rw-r--r--
mml-smime.elc	14.58 KB	-rw-r--r--
mml.elc	40.35 KB	-rw-r--r--
mml1991.elc	14.71 KB	-rw-r--r--
mml2015.elc	41.93 KB	-rw-r--r--
nnagent.elc	10.86 KB	-rw-r--r--
nnbabyl.elc	17.45 KB	-rw-r--r--
nndb.elc	29.58 KB	-rw-r--r--
nndiary.elc	39.38 KB	-rw-r--r--
nndir.elc	3.2 KB	-rw-r--r--
nndoc.elc	28.12 KB	-rw-r--r--
nndraft.elc	9.95 KB	-rw-r--r--
nneething.elc	11.98 KB	-rw-r--r--
nnfolder.elc	38.93 KB	-rw-r--r--
nngateway.elc	3.1 KB	-rw-r--r--
nnheader.elc	30.94 KB	-rw-r--r--
nnimap.elc	61.12 KB	-rw-r--r--
nnir.elc	45.26 KB	-rw-r--r--
nnkiboze.elc	11.79 KB	-rw-r--r--
nnlistserv.elc	4.42 KB	-rw-r--r--
nnmail.elc	52.92 KB	-rw-r--r--
nnmaildir.elc	98.94 KB	-rw-r--r--
nnmairix.elc	72.84 KB	-rw-r--r--
nnmbox.elc	19.03 KB	-rw-r--r--
nnmh.elc	15.64 KB	-rw-r--r--
nnml.elc	45.05 KB	-rw-r--r--
nnnil.elc	1.94 KB	-rw-r--r--
nnoo.elc	8.95 KB	-rw-r--r--
nnrss.elc	33.15 KB	-rw-r--r--
nnslashdot.elc	16.43 KB	-rw-r--r--
nnsoup.elc	21.22 KB	-rw-r--r--
nnspool.elc	15.55 KB	-rw-r--r--
nntp.elc	135.97 KB	-rw-r--r--
nnultimate.elc	13.85 KB	-rw-r--r--
nnvirtual.elc	18.99 KB	-rw-r--r--
nnwarchive.elc	21.92 KB	-rw-r--r--
nnweb.elc	18.3 KB	-rw-r--r--
nnwfm.elc	12.56 KB	-rw-r--r--
pop3.elc	13.01 KB	-rw-r--r--
qp.elc	4.12 KB	-rw-r--r--
rfc1843.elc	5.74 KB	-rw-r--r--
rfc2045.elc	1.01 KB	-rw-r--r--
rfc2047.elc	25.24 KB	-rw-r--r--
rfc2104.elc	1.71 KB	-rw-r--r--
rfc2231.elc	6.9 KB	-rw-r--r--
score-mode.elc	3.56 KB	-rw-r--r--
sieve-manage.elc	19.88 KB	-rw-r--r--
sieve-mode.elc	7.1 KB	-rw-r--r--
sieve.elc	10.77 KB	-rw-r--r--
smiley.elc	5.37 KB	-rw-r--r--
smime.elc	18.81 KB	-rw-r--r--
spam-report.elc	11.77 KB	-rw-r--r--
spam-stat.elc	19.88 KB	-rw-r--r--
spam-wash.elc	1.43 KB	-rw-r--r--
spam.elc	87.54 KB	-rw-r--r--
starttls.elc	6.63 KB	-rw-r--r--
utf7.elc	6.08 KB	-rw-r--r--
webmail.elc	28.79 KB	-rw-r--r--
yenc.elc	3.85 KB	-rw-r--r--

Code Editor : starttls.elc

;ELC���
;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:04:11 2015
;;; from file /builddir/build/BUILD/emacs-23.1/lisp/gnus/starttls.el
;;; in Emacs version 23.1.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`starttls.el' was compiled for Emacs 19.29 or later"))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(custom-declare-group 'starttls nil "Support for `Transport Layer Security' protocol." :version "21.1" :group 'mail)
#@121 Name of GNUTLS command line tool.
This program is used when GNUTLS is used, i.e. when
`starttls-use-gnutls' is non-nil.
(custom-declare-variable 'starttls-gnutls-program '"gnutls-cli" '(#$ . 730) :version "22.1" :type 'string :group 'starttls)
#@163 The program to run in a subprocess to open an TLSv1 connection.
This program is used when the `starttls' command is used,
i.e. when `starttls-use-gnutls' is nil.
(custom-declare-variable 'starttls-program '"starttls" '(#$ . 981) :type 'string :group 'starttls)
#@59 *Whether to use GNUTLS instead of the `starttls' command.
(custom-declare-variable 'starttls-use-gnutls '(not (executable-find starttls-program)) '(#$ . -1248) :version "22.1" :type 'boolean :group 'starttls)
#@129 Extra arguments to `starttls-program'.
These apply when the `starttls' command is used, i.e. when
`starttls-use-gnutls' is nil.
(custom-declare-variable 'starttls-extra-args 'nil '(#$ . 1464) :type '(repeat string) :group 'starttls)
#@266 Extra arguments to `starttls-program'.
These apply when GNUTLS is used, i.e. when `starttls-use-gnutls' is non-nil.

For example, non-TLS compliant servers may require
'("--protocols" "ssl3").  Invoke "gnutls-cli --help" to
find out which parameters are available.
(custom-declare-variable 'starttls-extra-arguments 'nil '(#$ . 1704) :version "22.1" :type '(repeat string) :group 'starttls)
#@77 *Value for `process-connection-type' to use when starting STARTTLS process.
(custom-declare-variable 'starttls-process-connection-type 'nil '(#$ . -2101) :version "22.1" :type 'boolean :group 'starttls)
#@106 *Regular expression indicating successful connection.
The default is what GNUTLS's "gnutls-cli" outputs.
(custom-declare-variable 'starttls-connect '"- Simple Client Mode:\n\n" '(#$ . -2311) :version "22.1" :type 'regexp :group 'starttls)
#@105 *Regular expression indicating failed TLS handshake.
The default is what GNUTLS's "gnutls-cli" outputs.
(custom-declare-variable 'starttls-failure '"\\*\\*\\* Handshake has failed" '(#$ . -2557) :version "22.1" :type 'regexp :group 'starttls)
#@109 *Regular expression indicating completed TLS handshakes.
The default is what GNUTLS's "gnutls-cli" outputs.
(custom-declare-variable 'starttls-success '"- Compression: " '(#$ . -2807) :version "22.1" :type 'regexp :group 'starttls)
#@215 Negotiate TLS on PROCESS opened by `open-starttls-stream'.
This should typically only be done once.  It typically returns a
multi-line informational message with information about the
handshake, or nil on failure.
(defalias 'starttls-negotiate-gnutls #[(process) "\306\211\211\211\211\307
!\211\204�\310\311
!\312\"\202\212�r\fq\210\212db\310\311
!\312\"\210\313
!\203`�\314
!\315=\203`�\212\nb\210\316\306\317#\211\206O�\316\306\317#\211)\204`�\320
\321\322#\210\323\324!\210\202*�\325\nd\"\nd|\210	\203q�\203�	\203\203�\203\203�	W\203\203�\202\211�\326\327\"\210\306*-\207" [done-bad done-ok old-max info buffer process nil process-buffer signal-process process-id SIGALRM processp process-status run re-search-forward t accept-process-output 1 100 sit-for 0.1 buffer-substring-no-properties message "STARTTLS negotiation failed: %s" starttls-success starttls-failure] 5 (#$ . 3046)])
(defalias 'starttls-negotiate #[(process) "\203�\302	!\207\303\304	!\305\"\207" [starttls-use-gnutls process starttls-negotiate-gnutls signal-process process-id SIGALRM] 3])
(byte-code "\300\301!\203�\302\303\301\"\210\202�\302\303\304\"\210\300\207" [fboundp set-process-query-on-exit-flag defalias starttls-set-process-query-on-exit-flag process-kill-without-query] 3)
(defalias 'starttls-open-stream-gnutls #[(name buffer host port) "\306\307	#\210\310rq\210d)
\311\312\313\314	\250\203'�\315	!\202(�	 &	!\316!\310\"\210\317!!\203e�\320!!\321=\203e�\212q\210\fb\210\322\"\310\323#\211)\204e�\324!\325\326#\210\327\330!\210\2024�\n\203u�rq\210\f\n|\210)\202}�\331!!\210\310!\306\332	\n\203\211�\333\202\212�\334$\210!,\207" [host port done buffer old-max starttls-process-connection-type message "Opening STARTTLS connection to `%s:%s'..." nil apply start-process "-s" "-p" int-to-string starttls-set-process-query-on-exit-flag processp process-status run re-search-forward t accept-process-output 0 100 sit-for 0.1 delete-process "Opening STARTTLS connection to `%s:%s'...%s" "done" "failed" process-connection-type name starttls-gnutls-program starttls-extra-arguments process starttls-connect] 10])
#@786 Open a TLS connection for a port to a host.
Returns a subprocess object to represent the connection.
Input and output work as for subprocesses; `delete-process' closes it.
Args are NAME BUFFER HOST PORT.
NAME is name for process.  It is modified if necessary to make it unique.
BUFFER is the buffer (or `buffer-name') to associate with the process.
 Process output goes at end of that buffer, unless you specify
 an output stream or filter function to handle the output.
 BUFFER may be also nil, meaning that this process is not associated
 with any buffer
Third arg is name of the host to connect to, or its IP address.
Fourth arg PORT is an integer specifying a port to connect to.
If `starttls-use-gnutls' is nil, this may also be a service name, but
GNUTLS requires a port number.
(defalias 'starttls-open-stream #[(name buffer host port) "\203�\306	\n\f$\207\307\310\311\312\f\"#\210
\313\314	\n\311\312\f\"&\315\316\"\210*\207" [starttls-use-gnutls name buffer host port starttls-process-connection-type starttls-open-stream-gnutls message "Opening STARTTLS connection to `%s:%s'" format "%s" apply start-process starttls-set-process-query-on-exit-flag nil process-connection-type starttls-program starttls-extra-args process] 9 (#$ . 5195)])
(defalias 'starttls-any-program-available #[nil "\203�	\202	�\n\304\305\306\217)\207" [starttls-use-gnutls starttls-gnutls-program starttls-program program nil (byte-code "\301!\210\207" [program call-process] 2) ((error (message "No STARTTLS program was available (tried '%s')" program) nil))] 3])
(provide 'starttls)

${this.title}

Code Editor : starttls.elc