Revision 6fddde87
| b/htools/Ganeti/Rpc.hs | ||
|---|---|---|
| 89 | 89 |
= CurlDisabledError |
| 90 | 90 |
| CurlLayerError Node String |
| 91 | 91 |
| JsonDecodeError String |
| 92 |
| RpcResultError String |
|
| 92 | 93 |
| OfflineNodeError Node |
| 93 | 94 |
deriving Eq |
| 94 | 95 |
|
| ... | ... | |
| 96 | 97 |
show CurlDisabledError = |
| 97 | 98 |
"RPC/curl backend disabled at compile time" |
| 98 | 99 |
show (CurlLayerError node code) = |
| 99 |
"Curl error for " ++ nodeName node ++ ", error " ++ code
|
|
| 100 |
"Curl error for " ++ nodeName node ++ ", " ++ code |
|
| 100 | 101 |
show (JsonDecodeError msg) = |
| 101 |
"Error while decoding JSON from HTTP response " ++ msg |
|
| 102 |
"Error while decoding JSON from HTTP response: " ++ msg |
|
| 103 |
show (RpcResultError msg) = |
|
| 104 |
"Error reponse received from RPC server: " ++ msg |
|
| 102 | 105 |
show (OfflineNodeError node) = |
| 103 | 106 |
"Node " ++ nodeName node ++ " is marked as offline" |
| 104 | 107 |
|
Also available in: Unified diff