# frozen_string_literal: true require "email/sender" RSpec.describe Email::Sender do before { SiteSetting.secure_uploads_allow_embed_images_in_emails = false } fab!(:post) { Fabricate(:post) } let(:mock_smtp_transaction_response) do "250 Ok: queued as 2l3Md07BObzB8kRyHZeoN0baSUAhzc7A-NviRioOr80=@mailhog.example" end def stub_deliver_response(message) message.stubs(:deliver!).returns(Net::SMTP::Response.new("250", mock_smtp_transaction_response)) end context "when disable_emails is enabled" do fab!(:user) { Fabricate(:user) } fab!(:moderator) { Fabricate(:moderator) } context "when disable_emails is enabled for everyone" do before { SiteSetting.disable_emails = "yes" } it "doesn't deliver mail when mails are disabled" do message = UserNotifications.email_login(moderator) Email::Sender.new(message, :email_login).send expect(ActionMailer::Base.deliveries).to eq([]) end it "delivers mail when mails are disabled but the email_type is admin_login" do message = UserNotifications.admin_login(moderator) Email::Sender.new(message, :admin_login).send expect(ActionMailer::Base.deliveries.first.to).to eq([moderator.email]) end it "delivers mail when mails are disabled but the email_type is test_message" do message = TestMailer.send_test(moderator.email) Email::Sender.new(message, :test_message).send expect(ActionMailer::Base.deliveries.first.to).to eq([moderator.email]) end end context "when disable_emails is enabled for non-staff users" do before { SiteSetting.disable_emails = "non-staff" } it "doesn't deliver mail to normal user" do Mail::Message.any_instance.expects(:deliver!).never message = Mail::Message.new(to: user.email, body: "hello") stub_deliver_response(message) expect(Email::Sender.new(message, :hello).send).to eq(nil) end it "delivers mail to staff user" do Mail::Message.any_instance.expects(:deliver!).once message = Mail::Message.new(to: moderator.email, body: "hello") Email::Sender.new(message, :hello).send end it "delivers mail to staff user when confirming new email if user is provided" do Mail::Message.any_instance.expects(:deliver!).once Fabricate( :email_change_request, { user: moderator, new_email: "newemail@testmoderator.com", old_email: moderator.email, change_state: EmailChangeRequest.states[:authorizing_new], }, ) message = Mail::Message.new(to: "newemail@testmoderator.com", body: "hello") Email::Sender.new(message, :confirm_new_email, moderator).send end end end it "doesn't deliver mail when the message is of type NullMail" do Mail::Message.any_instance.expects(:deliver!).never message = ActionMailer::Base::NullMail.new expect(Email::Sender.new(message, :hello).send).to eq(nil) end it "doesn't deliver mail when the message is nil" do Mail::Message.any_instance.expects(:deliver!).never Email::Sender.new(nil, :hello).send end it "doesn't deliver when the to address is nil" do message = Mail::Message.new(body: "hello") message.expects(:deliver!).never Email::Sender.new(message, :hello).send end it "doesn't deliver when the to address uses the .invalid tld" do message = Mail::Message.new(body: "hello", to: "myemail@example.invalid") message.expects(:deliver!).never expect { Email::Sender.new(message, :hello).send }.to change { SkippedEmailLog.where( reason_type: SkippedEmailLog.reason_types[:sender_message_to_invalid], ).count }.by(1) end it "doesn't deliver when the body is nil" do message = Mail::Message.new(to: "eviltrout@test.domain") message.expects(:deliver!).never Email::Sender.new(message, :hello).send end describe ".host_for" do it "defaults to localhost" do expect(Email::Sender.host_for(nil)).to eq("localhost") end it "returns localhost for a weird host" do expect(Email::Sender.host_for("this is not a real host")).to eq("localhost") end it "parses hosts from urls" do expect(Email::Sender.host_for("http://meta.discourse.org")).to eq("meta.discourse.org") end it "downcases hosts" do expect(Email::Sender.host_for("http://ForumSite.com")).to eq("forumsite.com") end end context "with a valid message" do let(:reply_key) { "abcd" * 8 } let(:message) do message = Mail::Message.new(to: "eviltrout@test.domain", body: "**hello**") stub_deliver_response(message) message end let(:email_sender) { Email::Sender.new(message, :valid_type) } it "calls deliver" do message.expects(:deliver!).once email_sender.send end context "when no plus addressing" do before { SiteSetting.reply_by_email_address = "%{reply_key}@test.com" } it "should not set the return_path" do email_sender.send expect(message.header[:return_path].to_s).to eq("") end end context "with plus addressing" do before { SiteSetting.reply_by_email_address = "replies+%{reply_key}@test.com" } it "should set the return_path" do email_sender.send expect(message.header[:return_path].to_s).to eq( "replies+verp-#{EmailLog.last.bounce_key}@test.com", ) end end context "when topic id is present" do fab!(:category) { Fabricate(:category, name: "Name With Space") } fab!(:topic) { Fabricate(:topic, category: category) } fab!(:post) { Fabricate(:post, topic: topic) } before do message.header["X-Discourse-Post-Id"] = post.id message.header["X-Discourse-Topic-Id"] = topic.id end it "should add the right header" do email_sender.send expect(message.header["List-ID"]).to be_present expect(message.header["List-ID"].to_s).to match("name-with-space") end end context "when topic id is not present" do it "should add the right header" do email_sender.send expect(message.header["Message-ID"]).to be_present end end context "when reply_key is present" do fab!(:user) { Fabricate(:user) } let(:email_sender) { Email::Sender.new(message, :valid_type, user) } let(:reply_key) { PostReplyKey.find_by!(post_id: post.id, user_id: user.id).reply_key } before do SiteSetting.reply_by_email_address = "replies+%{reply_key}@test.com" SiteSetting.email_custom_headers = "Auto-Submitted: auto-generated|Mail-Reply-To: sender-name+%{reply_key}@domain.net" message.header["X-Discourse-Post-Id"] = post.id end it "replaces headers with reply_key if present" do message.header[ Email::MessageBuilder::ALLOW_REPLY_BY_EMAIL_HEADER ] = "test-%{reply_key}@test.com" message.header["Reply-To"] = "Test " message.header["Auto-Submitted"] = "auto-generated" message.header["Mail-Reply-To"] = "sender-name+%{reply_key}@domain.net" email_sender.send expect(message.header["Reply-To"].to_s).to eq("Test ") expect(message.header["Auto-Submitted"].to_s).to eq("auto-generated") expect(message.header["Mail-Reply-To"].to_s).to eq("sender-name+#{reply_key}@domain.net") end it "removes headers with reply_key if absent" do message.header["Auto-Submitted"] = "auto-generated" message.header["Mail-Reply-To"] = "sender-name+%{reply_key}@domain.net" email_sender.send expect(message.header["Reply-To"].to_s).to eq("") expect(message.header["Auto-Submitted"].to_s).to eq("auto-generated") expect(message.header["Mail-Reply-To"].to_s).to eq("") end end describe "adds Precedence header" do fab!(:topic) { Fabricate(:topic) } fab!(:post) { Fabricate(:post, topic: topic) } before do message.header["X-Discourse-Post-Id"] = post.id message.header["X-Discourse-Topic-Id"] = topic.id end it "should add the right header" do email_sender.send expect(message.header["Precedence"]).to be_present end end describe "removes custom Discourse headers from digest/registration/other mails" do it "should remove the right headers" do email_sender.send expect(message.header["X-Discourse-Topic-Id"]).not_to be_present expect(message.header["X-Discourse-Post-Id"]).not_to be_present expect(message.header["X-Discourse-Reply-Key"]).not_to be_present end end describe "email threading" do fab!(:topic) { Fabricate(:topic) } fab!(:post_1) { Fabricate(:post, topic: topic, post_number: 1) } fab!(:post_2) { Fabricate(:post, topic: topic, post_number: 2) } fab!(:post_3) { Fabricate(:post, topic: topic, post_number: 3) } fab!(:post_4) { Fabricate(:post, topic: topic, post_number: 4) } fab!(:post_5) { Fabricate(:post, topic: topic, post_number: 5) } fab!(:post_6) { Fabricate(:post, topic: topic, post_number: 6) } let!(:post_reply_1_4) { PostReply.create(post: post_1, reply: post_4) } let!(:post_reply_2_4) { PostReply.create(post: post_2, reply: post_4) } let!(:post_reply_3_4) { PostReply.create(post: post_3, reply: post_4) } let!(:post_reply_4_5) { PostReply.create(post: post_4, reply: post_5) } let!(:post_reply_4_6) { PostReply.create(post: post_4, reply: post_6) } let!(:post_reply_5_6) { PostReply.create(post: post_5, reply: post_6) } before { message.header["X-Discourse-Topic-Id"] = topic.id } it "doesn't set References or In-Reply-To headers on the first post, only generates a Message-ID and saves it against the post" do message.header["X-Discourse-Post-Id"] = post_1.id email_sender.send post_1.reload expect(message.header["Message-Id"].to_s).to eq( "", ) expect(post_1.outbound_message_id).to eq("discourse/post/#{post_1.id}@test.localhost") expect(message.header["In-Reply-To"].to_s).to be_blank expect(message.header["References"].to_s).to be_blank end it "uses the existing Message-ID header from the incoming email when sending the first post email" do incoming = Fabricate( :incoming_email, topic: topic, post: post_1, message_id: "blah1234@someemailprovider.com", created_via: IncomingEmail.created_via_types[:handle_mail], ) post_1.update!(outbound_message_id: incoming.message_id) message.header["X-Discourse-Post-Id"] = post_1.id email_sender.send expect(message.header["Message-Id"].to_s).to eq("") expect(message.header["In-Reply-To"].to_s).to be_blank expect(message.header["References"].to_s).to be_blank end it "if no post is directly replied to then the Message-ID of post 1 via outbound_message_id should be used" do message.header["X-Discourse-Post-Id"] = post_2.id email_sender.send expect(message.header["Message-Id"].to_s).to eq( "", ) expect(message.header["In-Reply-To"].to_s).to eq( "", ) expect(message.header["References"].to_s).to eq( "", ) end it "sets the References header to the most recently created replied post, as well as the OP, if there are no other replies in the chain" do message.header["X-Discourse-Post-Id"] = post_4.id email_sender.send expect(message.header["Message-ID"].to_s).to eq( "", ) expect(message.header["References"].to_s).to eq( " ", ) end it "sets the In-Reply-To header to all the posts that the post is connected to via PostReply" do message.header["X-Discourse-Post-Id"] = post_6.id email_sender.send expect(message.header["Message-ID"].to_s).to eq( "", ) expect(message.header["In-Reply-To"].to_s).to eq( " ", ) end it "sets the In-Reply-To and References header to the most recently created replied post and includes the parents of that post in References, as well as the OP" do message.header["X-Discourse-Post-Id"] = post_4.id PostReply.create(post: post_2, reply: post_3) email_sender.send expect(message.header["Message-ID"].to_s).to eq( "", ) expect(message.header["In-Reply-To"].to_s).to eq( " ", ) references = [ "", "", "", ] expect(message.header["References"].to_s).to eq(references.join(" ")) end it "handles a complex reply tree to the OP for References, only using one Message-ID if there are multiple parents for a post" do message.header["X-Discourse-Post-Id"] = post_6.id PostReply.create(post: post_2, reply: post_6) email_sender.send expect(message.header["Message-ID"].to_s).to eq( "", ) expect(message.header["In-Reply-To"].to_s).to eq( " ", ) references = [ "", "", "", "", ] expect(message.header["References"].to_s).to eq(references.join(" ")) end end describe "merges custom mandrill header" do before do ActionMailer::Base.smtp_settings[:address] = "smtp.mandrillapp.com" message.header["X-MC-Metadata"] = { foo: "bar" }.to_json end it "should set the right header" do email_sender.send expect(message.header["X-MC-Metadata"].to_s).to match(message.message_id) end end describe "merges custom sparkpost header" do before do ActionMailer::Base.smtp_settings[:address] = "smtp.sparkpostmail.com" message.header["X-MSYS-API"] = { foo: "bar" }.to_json end it "should set the right header" do email_sender.send expect(message.header["X-MSYS-API"].to_s).to match(message.message_id) end end context "with email logs" do let(:email_log) { EmailLog.last } it "should create the right log" do expect do email_sender.send end.to_not change { PostReplyKey.count } expect(email_log).to be_present expect(email_log.email_type).to eq("valid_type") expect(email_log.to_address).to eq("eviltrout@test.domain") expect(email_log.user_id).to be_blank expect(email_log.raw).to eq(nil) end context "when the email is sent using group SMTP credentials" do let(:reply) do Fabricate( :post, topic: post.topic, reply_to_user: post.user, reply_to_post_number: post.post_number, ) end let(:notification) { Fabricate(:posted_notification, user: post.user, post: reply) } let(:message) { GroupSmtpMailer.send_mail(group, post.user.email, post) } let(:group) { Fabricate(:smtp_group) } before do SiteSetting.enable_smtp = true stub_deliver_response(message) end it "adds the group id and raw content to the email log" do TopicAllowedGroup.create(topic: post.topic, group: group) email_sender.send expect(email_log).to be_present expect(email_log.email_type).to eq("valid_type") expect(email_log.to_address).to eq(post.user.email) expect(email_log.user_id).to be_blank expect(email_log.smtp_group_id).to eq(group.id) expect(email_log.raw).to include("Hello world") end it "does not add any of the mailing list headers" do TopicAllowedGroup.create(topic: post.topic, group: group) email_sender.send expect(message.header["List-ID"]).to eq(nil) expect(message.header["List-Archive"]).to eq(nil) expect(message.header["Precedence"]).to eq(nil) expect(message.header["List-Unsubscribe"]).to eq(nil) end it "removes the Auto-Submitted header" do TopicAllowedGroup.create!(topic: post.topic, group: group) email_sender.send expect(message.header["Auto-Submitted"]).to eq(nil) end end end context "with email log with a post id and topic id" do let(:topic) { post.topic } before do message.header["X-Discourse-Post-Id"] = post.id message.header["X-Discourse-Topic-Id"] = topic.id end let(:email_log) { EmailLog.last } it "should create the right log" do email_sender.send expect(email_log.post_id).to eq(post.id) expect(email_log.topic_id).to eq(topic.id) expect(email_log.topic.id).to eq(topic.id) end end context "with email parts" do it "should contain the right message" do email_sender.send expect(message).to be_multipart expect(message.text_part.content_type).to eq("text/plain; charset=UTF-8") expect(message.html_part.content_type).to eq("text/html; charset=UTF-8") expect(message.html_part.body.to_s).to match("

hello

") end end end context "with attachments" do fab!(:small_pdf) do SiteSetting.authorized_extensions = "pdf" UploadCreator.new(file_from_fixtures("small.pdf", "pdf"), "small.pdf").create_for( Discourse.system_user.id, ) end fab!(:large_pdf) do SiteSetting.authorized_extensions = "pdf" UploadCreator.new(file_from_fixtures("large.pdf", "pdf"), "large.pdf").create_for( Discourse.system_user.id, ) end fab!(:csv_file) do SiteSetting.authorized_extensions = "csv" UploadCreator.new(file_from_fixtures("words.csv", "csv"), "words.csv").create_for( Discourse.system_user.id, ) end fab!(:image) do SiteSetting.authorized_extensions = "png" UploadCreator.new(file_from_fixtures("logo.png", "images"), "logo.png").create_for( Discourse.system_user.id, ) end fab!(:post) { Fabricate(:post) } fab!(:reply) do raw = <<~RAW Hello world! It’s a great day! #{UploadMarkdown.new(small_pdf).attachment_markdown} #{UploadMarkdown.new(large_pdf).attachment_markdown} #{UploadMarkdown.new(image).image_markdown} #{UploadMarkdown.new(csv_file).attachment_markdown} RAW reply = Fabricate(:post, raw: raw, topic: post.topic, user: Fabricate(:user)) reply.link_post_uploads reply end fab!(:notification) { Fabricate(:posted_notification, user: post.user, post: reply) } let(:message) do UserNotifications.user_posted( post.user, post: reply, notification_type: notification.notification_type, notification_data_hash: notification.data_hash, ) end it "adds only non-image uploads as attachments to the email" do SiteSetting.email_total_attachment_size_limit_kb = 10_000 Email::Sender.new(message, :valid_type).send expect(message.attachments.length).to eq(3) expect(message.attachments.map(&:filename)).to contain_exactly( *[small_pdf, large_pdf, csv_file].map(&:original_filename), ) end it "changes the hashtags to the slug with a # symbol beforehand rather than the full name of the resource" do SiteSetting.enable_experimental_hashtag_autocomplete = true category = Fabricate(:category, slug: "dev") reply.update!(raw: reply.raw + "\n wow this is #dev") reply.rebake! Email::Sender.new(message, :valid_type).send expected = <<~HTML #dev HTML expect(message.html_part.body.to_s).to include(expected.chomp) end context "when secure uploads enabled" do before do setup_s3 store = stub_s3_store SiteSetting.secure_uploads = true SiteSetting.login_required = true SiteSetting.email_total_attachment_size_limit_kb = 14_000 SiteSetting.secure_uploads_max_email_embed_image_size_kb = 5_000 Jobs.run_immediately! Jobs::PullHotlinkedImages.any_instance.expects(:execute) FileStore::S3Store.any_instance.expects(:has_been_uploaded?).returns(true).at_least_once CookedPostProcessor.any_instance.stubs(:get_size).returns([244, 66]) @secure_image_file = file_from_fixtures("logo.png", "images") @secure_image = UploadCreator.new(@secure_image_file, "logo.png").create_for(Discourse.system_user.id) @secure_image.update_secure_status(override: true) @secure_image.update(access_control_post_id: reply.id) reply.update(raw: reply.raw + "\n" + "#{UploadMarkdown.new(@secure_image).image_markdown}") reply.rebake! end it "does not attach images when embedding them is not allowed" do Email::Sender.new(message, :valid_type).send expect(message.attachments.length).to eq(3) end context "when embedding secure images in email is allowed" do before { SiteSetting.secure_uploads_allow_embed_images_in_emails = true } it "can inline images with duplicate names" do @secure_image_2 = UploadCreator.new(file_from_fixtures("logo-dev.png", "images"), "logo.png").create_for( Discourse.system_user.id, ) @secure_image_2.update_secure_status(override: true) @secure_image_2.update(access_control_post_id: reply.id) Jobs::PullHotlinkedImages.any_instance.expects(:execute) reply.update( raw: "#{UploadMarkdown.new(@secure_image).image_markdown}\n#{UploadMarkdown.new(@secure_image_2).image_markdown}", ) reply.rebake! Email::Sender.new(message, :valid_type).send expect(message.attachments.size).to eq(2) expect(message.to_s.scan(/cid:[\w\-@.]+/).length).to eq(2) expect(message.to_s.scan(/cid:[\w\-@.]+/).uniq.length).to eq(2) end it "does not attach images that are not marked as secure" do Email::Sender.new(message, :valid_type).send expect(message.attachments.length).to eq(4) end it "does not embed images that are too big" do SiteSetting.secure_uploads_max_email_embed_image_size_kb = 1 Email::Sender.new(message, :valid_type).send expect(message.attachments.length).to eq(3) end it "uses the email styles to inline secure images and attaches the secure image upload to the email" do Email::Sender.new(message, :valid_type).send expect(message.attachments.length).to eq(4) expect(message.attachments.map(&:filename)).to contain_exactly( *[small_pdf, large_pdf, csv_file, @secure_image].map(&:original_filename), ) expect(message.attachments["logo.png"].body.raw_source.force_encoding("UTF-8")).to eq( File.read(@secure_image_file), ) expect(message.html_part.body).to include("cid:") expect(message.html_part.body).to include("embedded-secure-image") expect(message.attachments.length).to eq(4) end it "uses correct UTF-8 encoding for the body of the email" do Email::Sender.new(message, :valid_type).send expect(message.html_part.body).not_to include("Itâ\u0080\u0099s") expect(message.html_part.body).to include("It’s") expect(message.html_part.charset.downcase).to eq("utf-8") end context "when the uploaded secure image has an optimized image" do let!(:optimized) { Fabricate(:optimized_image, upload: @secure_image) } let!(:optimized_image_file) { file_from_fixtures("smallest.png", "images") } before do url = Discourse.store.store_optimized_image(optimized_image_file, optimized) optimized.update(url: Discourse.store.absolute_base_url + "/" + url) Discourse.store.cache_file(optimized_image_file, File.basename("#{optimized.sha1}.png")) end it "uses the email styles and the optimized image to inline secure images and attaches the secure image upload to the email" do Email::Sender.new(message, :valid_type).send expect(message.attachments.length).to eq(4) expect(message.attachments.map(&:filename)).to contain_exactly( *[small_pdf, large_pdf, csv_file, @secure_image].map(&:original_filename), ) expect(message.attachments["logo.png"].body.raw_source.force_encoding("UTF-8")).to eq( File.read(optimized_image_file), ) expect(message.html_part.body).to include("cid:") expect(message.html_part.body).to include("embedded-secure-image") end it "uses the optimized image size in the max size limit calculation, not the original image size" do SiteSetting.email_total_attachment_size_limit_kb = 45 Email::Sender.new(message, :valid_type).send expect(message.attachments.length).to eq(4) expect(message.attachments["logo.png"].body.raw_source.force_encoding("UTF-8")).to eq( File.read(optimized_image_file), ) end end end end it "adds only non-image uploads as attachments to the email and leaves the image intact with original source" do SiteSetting.email_total_attachment_size_limit_kb = 10_000 Email::Sender.new(message, :valid_type).send expect(message.attachments.length).to eq(3) expect(message.attachments.map(&:filename)).to contain_exactly( *[small_pdf, large_pdf, csv_file].map(&:original_filename), ) expect(message.html_part.body).to include("