책들
Haskell
제11장. HTML과 웹
기본 인증을 사용한 HTTP 요청 보내기

Haskell:
기본 인증을 사용한 HTTP 요청 보내기

How to: (방법)

Haskell에서 HTTP 요청을 보내고 Basic 인증을 처리하는 간단한 예시입니다:

import Network.HTTP.Simple
import Data.ByteString.Base64 (encode)

-- 사용자 이름과 비밀번호로 Basic 인증 헤더 생성
createBasicAuth :: String -> String -> String
createBasicAuth username password =
    "Basic " ++ (decodeUtf8 . encode . encodeUtf8) (username ++ ":" ++ password)

-- HTTP 요청을 보내고 결과를 출력
makeRequest :: IO ()
makeRequest = do
    let authHeader = createBasicAuth "your_username" "your_password"
    let request = setRequestHeader "Authorization" [encodeUtf8 . pack $ authHeader]
                $ "http://example.com/protected"
    response <- httpBS request
    print $ getResponseBody response

-- 함수 호출
main :: IO ()
main = makeRequest

이 코드를 실행하면, 서버로부터의 응답이 프린트됩니다.

Deep Dive (심층 분석)

Basic 인증은 HTTP 프로토콜의 가장 오래된 인증 메커니즘 중 하나입니다. 명백한 간결함에도 불구하고, SSL/TLS 암호화와 결합되지 않으면 취약점이 있으므로 주의해야 합니다. 대안으로는 OAuth, API 키, 또는 토큰 기반 인증 방법들이 있습니다.

Basic 인증 구현은 Authorization 헤더에 Basic 후에 Base64로 인코딩된 username:password 문자열을 추가함으로써 수행됩니다. Haskell에서는 Data.ByteString.Base64 모듈을 활용하여 인코딩할 수 있으며, Network.HTTP.Simple 라이브러리를 통해 HTTP 요청을 쉽게 조작할 수 있습니다.

See Also (참고 자료)

HTTP 요청 보내기