97 lines
2.6 KiB
Crystal
97 lines
2.6 KiB
Crystal
|
require "../spec_helper"
|
||
|
|
|
||
|
|
def resource_request(resource : String)
|
||
|
|
headers = HTTP::Headers{"Host" => "example.com"}
|
||
|
|
HTTP::Request.new("GET", resource, headers)
|
||
|
|
end
|
||
|
|
|
||
|
|
describe ArticleIdParser do
|
||
|
|
it "parses the post id for urls like /@user/:post_slug" do
|
||
|
|
request = resource_request("/@user/my-post-111111abcdef")
|
||
|
|
|
||
|
|
result = ArticleIdParser.parse(request)
|
||
|
|
|
||
|
|
result.should eq(Monads::Just.new("111111abcdef"))
|
||
|
|
end
|
||
|
|
|
||
|
|
it "parses the post id for urls like /user/:post_slug" do
|
||
|
|
request = resource_request("/user/my-post-222222abcdef")
|
||
|
|
|
||
|
|
result = ArticleIdParser.parse(request)
|
||
|
|
|
||
|
|
result.should eq(Monads::Just.new("222222abcdef"))
|
||
|
|
end
|
||
|
|
|
||
|
|
it "parses the post id for urls like /p/:post_slug" do
|
||
|
|
request = resource_request("/p/my-post-333333abcdef")
|
||
|
|
|
||
|
|
result = ArticleIdParser.parse(request)
|
||
|
|
|
||
|
|
result.should eq(Monads::Just.new("333333abcdef"))
|
||
|
|
end
|
||
|
|
|
||
|
|
it "parses the post id for urls like /posts/:post_slug" do
|
||
|
|
request = resource_request("/posts/my-post-444444abcdef")
|
||
|
|
|
||
|
|
result = ArticleIdParser.parse(request)
|
||
|
|
|
||
|
|
result.should eq(Monads::Just.new("444444abcdef"))
|
||
|
|
end
|
||
|
|
|
||
|
|
it "parses the post id for urls like /p/:post_id" do
|
||
|
|
request = resource_request("/p/555555abcdef")
|
||
|
|
|
||
|
|
result = ArticleIdParser.parse(request)
|
||
|
|
|
||
|
|
result.should eq(Monads::Just.new("555555abcdef"))
|
||
|
|
end
|
||
|
|
|
||
|
|
it "parses the post id for urls like /:post_slug" do
|
||
|
|
request = resource_request("/my-post-666666abcdef")
|
||
|
|
|
||
|
|
result = ArticleIdParser.parse(request)
|
||
|
|
|
||
|
|
result.should eq(Monads::Just.new("666666abcdef"))
|
||
|
|
end
|
||
|
|
|
||
|
|
it "parses the post id for urls like /https:/medium.com/@user/:post_slug" do
|
||
|
|
request = resource_request("/https:/medium.com/@user/777777abcdef")
|
||
|
|
|
||
|
|
result = ArticleIdParser.parse(request)
|
||
|
|
|
||
|
|
result.should eq(Monads::Just.new("777777abcdef"))
|
||
|
|
end
|
||
|
|
|
||
|
|
it "parses the post id for global identity redirects" do
|
||
|
|
request = resource_request("/m/global-identity?redirectUrl=https%3A%2F%2Fexample.com%2Fmy-post-888888abcdef")
|
||
|
|
|
||
|
|
result = ArticleIdParser.parse(request)
|
||
|
|
|
||
|
|
result.should eq(Monads::Just.new("888888abcdef"))
|
||
|
|
end
|
||
|
|
|
||
|
|
it "returns Nothing if path is a username" do
|
||
|
|
request = resource_request("/@ba5eba11")
|
||
|
|
|
||
|
|
result = ArticleIdParser.parse(request)
|
||
|
|
|
||
|
|
result.should eq(Monads::Nothing(String).new)
|
||
|
|
end
|
||
|
|
|
||
|
|
it "returns Nothing if path is a tag" do
|
||
|
|
request = resource_request("/tag/0ddba11")
|
||
|
|
|
||
|
|
result = ArticleIdParser.parse(request)
|
||
|
|
|
||
|
|
result.should eq(Monads::Nothing(String).new)
|
||
|
|
end
|
||
|
|
|
||
|
|
it "returns Nothing if path is search result" do
|
||
|
|
request = resource_request("/search?q=ba5eba11")
|
||
|
|
|
||
|
|
result = ArticleIdParser.parse(request)
|
||
|
|
|
||
|
|
result.should eq(Monads::Nothing(String).new)
|
||
|
|
end
|
||
|
|
end
|