Ssh error

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
primitive SshDecryptFailed is Stringable
  fun string(): String iso^ => "decryption failed".clone()

primitive SshEncryptFailed is Stringable
  fun string(): String iso^ => "encryption failed".clone()

primitive SshMacMismatch is Stringable
  fun string(): String iso^ => "MAC mismatch".clone()

primitive SshSignatureInvalid is Stringable
  fun string(): String iso^ => "signature invalid".clone()

primitive SshKeyInvalid is Stringable
  fun string(): String iso^ => "key invalid".clone()

class val SshOpenSSLError is Stringable
  let code: U64
  let message: String val
  new val create(code': U64, message': String val) =>
    code = code'
    message = message'
  fun string(): String iso^ =>
    ("OpenSSL error " + code.string() + ": " + message).clone()

type SshCryptoError is
  ( SshDecryptFailed
  | SshEncryptFailed
  | SshMacMismatch
  | SshSignatureInvalid
  | SshKeyInvalid
  | SshOpenSSLError )

primitive SshServerHostKeyLoadFailed is Stringable
  """The server host key PEM could not be loaded."""
  fun string(): String iso^ =>
    """The message contains no host key bytes."""
    "server host key could not be loaded".clone()

class val SshServerChannelWindowTooSmall is Stringable
  """The configured channel receive window is below the supported minimum."""
  let given: U32
  let minimum: U32

  new val create(given': U32, minimum': U32) =>
    """The rejected window and minimum remain available for inspection."""
    given = given'
    minimum = minimum'

  fun string(): String iso^ =>
    """The message includes the rejected window and required minimum."""
    ("server channel window " + given.string() +
      " is below minimum " + minimum.string()).clone()

type SshServerConfigError is
  (SshServerHostKeyLoadFailed | SshServerChannelWindowTooSmall)
  """A server host key load failure or an undersized channel window."""

primitive SshPacketTooLarge is Stringable
  fun string(): String iso^ => "packet too large".clone()

primitive SshPacketCorrupt is Stringable
  fun string(): String iso^ => "packet corrupt".clone()

class val SshKexFailed is Stringable
  let inner: SshCryptoError
  new val create(inner': SshCryptoError) => inner = inner'
  fun string(): String iso^ =>
    ("key exchange failed: " + inner.string()).clone()

primitive SshAlgorithmNegotiationFailed is Stringable
  fun string(): String iso^ => "algorithm negotiation failed".clone()

primitive SshProtocolVersionMismatch is Stringable
  fun string(): String iso^ => "protocol version mismatch".clone()

primitive SshConnectionLost is Stringable
  fun string(): String iso^ => "connection lost".clone()

primitive SshRekeyUnsupported is Stringable
  fun string(): String iso^ => "rekeying is not supported".clone()

primitive SshStrictKexViolation is Stringable
  fun string(): String iso^ =>
    "strict key-exchange violation (unexpected packet during handshake)".clone()

primitive SshUnexpectedMessage is Stringable
  fun string(): String iso^ =>
    "unexpected message for the current protocol state".clone()

primitive SshTooManyAuthAttempts is Stringable
  fun string(): String iso^ => "too many authentication attempts".clone()

primitive SshPendingSendsExceeded is Stringable
  fun string(): String iso^ =>
    "deferred send queue exceeded its bound (rekey never completed)".clone()

type SshTransportError is
  ( SshPacketTooLarge
  | SshPacketCorrupt
  | SshKexFailed
  | SshAlgorithmNegotiationFailed
  | SshProtocolVersionMismatch
  | SshConnectionLost
  | SshRekeyUnsupported
  | SshStrictKexViolation
  | SshUnexpectedMessage
  | SshTooManyAuthAttempts
  | SshPendingSendsExceeded )

primitive SshAuthRejected is Stringable
  fun string(): String iso^ => "authentication rejected".clone()

primitive SshAuthProtocolError is Stringable
  fun string(): String iso^ => "authentication protocol error".clone()

class val SshAuthCryptoError is Stringable
  let inner: SshCryptoError
  new val create(inner': SshCryptoError) => inner = inner'
  fun string(): String iso^ =>
    ("authentication crypto error: " + inner.string()).clone()

type SshAuthError is
  ( SshAuthRejected
  | SshAuthProtocolError
  | SshAuthCryptoError )

class val SshChannelOpenFailed is Stringable
  let reason_code: U32
  let description: String val
  new val create(reason_code': U32, description': String val) =>
    reason_code = reason_code'
    description = description'
  fun string(): String iso^ =>
    ("channel open failed (" + reason_code.string() + "): " + description).clone()

class val SshChannelUnsupportedPacketSize is Stringable
  """A peer advertised a channel packet size below the supported minimum."""
  let advertised: U32
  let minimum: U32
  new val create(advertised': U32, minimum': U32) =>
    """Both sizes remain available for caller inspection."""
    advertised = advertised'
    minimum = minimum'
  fun string(): String iso^ =>
    """Include both sizes in the error message."""
    ("peer channel packet size " + advertised.string() +
      " is below minimum " + minimum.string()).clone()

primitive SshChannelClosed is Stringable
  fun string(): String iso^ => "channel closed".clone()

primitive SshWindowExhausted is Stringable
  fun string(): String iso^ => "window exhausted".clone()

type SshChannelError is
  ( SshChannelOpenFailed
  | SshChannelUnsupportedPacketSize
  | SshChannelClosed
  | SshWindowExhausted )