No puede seleccionar más de 25 temas Los temas deben comenzar con una letra o número, pueden incluir guiones ('-') y pueden tener hasta 35 caracteres de largo.

917 líneas
47KB

  1. <!DOCTYPE html>
  2. <html>
  3. <head>
  4. <meta http-equiv="X-UA-Compatible" content="IE=9" />
  5. <title>MassMailer</title>
  6. <HTA:APPLICATION ID="MassMailer" APPLICATIONNAME="MassMailer" BORDER="thick" SCROLL="yes" SINGLEINSTANCE="yes" />
  7. <style type="text/css">
  8. body { margin: 0; font: 15px Segoe UI, Arial, sans-serif; color: #243145; background: #f4f6f8; }
  9. header { background: #17324e; color: #fff; padding: 22px 28px; }
  10. h1 { margin: 0; font-size: 24px; }
  11. header p { margin: 7px 0 0; color: #d2dfec; }
  12. main { padding: 24px 28px; }
  13. .tabbar { margin: 0 0 20px; border-bottom: 2px solid #cbd7e2; }
  14. .tab-button { margin: 0 4px 0 0; padding: 11px 15px; background: transparent; color: #17324e; border: 1px solid transparent; border-bottom: 0; font-weight: bold; }
  15. .tab-button:hover, .tab-button:focus { background: #e8eff5; }
  16. .tab-button.active { background: white; border-color: #cbd7e2; color: #105b88; }
  17. .tab-pane { display: none; }
  18. .tab-pane.active { display: block; }
  19. .notice { padding: 14px 17px; background: #fff7e3; border-left: 4px solid #ca8f13; margin-bottom: 22px; }
  20. .cards { display: table; width: 100%; border-spacing: 10px; margin-left: -10px; }
  21. .card { display: table-cell; width: 25%; background: white; padding: 18px; border: 1px solid #dbe1e7; }
  22. .number { display: block; margin-top: 8px; font-size: 28px; color: #17324e; }
  23. .details { background: white; padding: 18px; border: 1px solid #dbe1e7; line-height: 1.7; }
  24. .details strong { display: inline-block; width: 135px; }
  25. button { background: #176b9b; color: white; border: 0; padding: 9px 16px; cursor: pointer; margin-top: 17px; }
  26. button:disabled { background: #a7b3bd; cursor: default; }
  27. .panel { background: white; padding: 18px; border: 1px solid #dbe1e7; margin-top: 18px; }
  28. .panel h2 { margin: 0 0 12px; font-size: 19px; }
  29. .field { display: block; margin: 12px 0; }
  30. .field input, .field select { display: block; width: 95%; max-width: 640px; padding: 7px; margin-top: 4px; }
  31. table { border-collapse: collapse; width: 100%; margin-top: 15px; }
  32. th, td { border-bottom: 1px solid #e4e8ec; padding: 7px; text-align: left; }
  33. .bad { color: #9c2929; }
  34. .good { color: #235e37; }
  35. #error { color: #9c2929; white-space: pre-wrap; margin-top: 12px; }
  36. #templatePreview, #campaignPreview { width: 100%; height: 440px; border: 1px solid #dbe1e7; background: white; margin-top: 12px; }
  37. </style>
  38. <script language="JScript" src="src/contacts.js"></script>
  39. <script language="JScript" type="text/javascript">
  40. var pendingCsvText = null;
  41. var pendingPreview = null;
  42. var pendingSource = "";
  43. var pendingPath = "";
  44. var pendingCampaignReview = null;
  45. var campaignTestAccepted = false;
  46. var dispatchSessionPid = 0;
  47. var dispatchSessionToken = "";
  48. var dispatchSessionPath = "";
  49. var dispatchReady = false;
  50. var dispatchProcess = null;
  51. var dispatchTimerId = null;
  52. function projectRoot() {
  53. var path = decodeURIComponent(window.location.pathname);
  54. if (path.charAt(0) === "/" && path.charAt(2) === ":") path = path.substring(1);
  55. path = path.replace(/\//g, "\\");
  56. return new ActiveXObject("Scripting.FileSystemObject").GetParentFolderName(path);
  57. }
  58. function readSettings(filePath) {
  59. var stream = new ActiveXObject("ADODB.Stream");
  60. stream.Type = 2;
  61. stream.Charset = "utf-8";
  62. stream.Open();
  63. stream.LoadFromFile(filePath);
  64. var data = stream.ReadText();
  65. stream.Close();
  66. var result = {};
  67. var lines = data.replace(/\r\n?/g, "\n").split("\n");
  68. for (var i = 0; i < lines.length; i++) {
  69. var line = lines[i].replace(/^\s+|\s+$/g, "");
  70. if (!line || line.charAt(0) === "#" || line.charAt(0) === ";") continue;
  71. var equalAt = line.indexOf("=");
  72. if (equalAt > 0) result[line.substring(0, equalAt).replace(/\s/g, "").toUpperCase()] =
  73. line.substring(equalAt + 1).replace(/^\s+|\s+$/g, "");
  74. }
  75. return result;
  76. }
  77. function countRows(db, tableName) {
  78. var rows = db.Execute("SELECT COUNT(*) AS N FROM [" + tableName + "]");
  79. var result = rows.Fields("N").Value;
  80. rows.Close();
  81. return result;
  82. }
  83. function openDatabase() {
  84. var fs = new ActiveXObject("Scripting.FileSystemObject");
  85. var root = projectRoot();
  86. var config = readSettings(fs.BuildPath(root, "config.ini"));
  87. var dbPath = config.DB_PATH;
  88. if (fs.GetDriveName(dbPath) === "") dbPath = fs.BuildPath(root, dbPath);
  89. dbPath = fs.GetAbsolutePathName(dbPath);
  90. var db = new ActiveXObject("ADODB.Connection");
  91. db.Open("Provider=" + config.DB_PROVIDER + ";Data Source=" + dbPath + ";");
  92. return { db: db, config: config, path: dbPath };
  93. }
  94. function refreshStatus() {
  95. var db = null;
  96. try {
  97. var opened = openDatabase();
  98. db = opened.db;
  99. document.getElementById("contacts").innerText = countRows(db, "Contact");
  100. document.getElementById("suppressed").innerText = countRows(db, "Suppression");
  101. document.getElementById("templates").innerText = countRows(db, "TemplateVersion");
  102. document.getElementById("campaigns").innerText = countRows(db, "Campaign");
  103. document.getElementById("database").innerText = opened.path;
  104. document.getElementById("provider").innerText = opened.config.DB_PROVIDER;
  105. document.getElementById("interval").innerText = opened.config.QUEUE_INTERVAL + " seconds";
  106. document.getElementById("testTo").innerText = opened.config.SMTP_TEST_TO || "Not configured";
  107. document.getElementById("error").innerText = "";
  108. } catch (error) {
  109. document.getElementById("error").innerText = "Status refresh failed: " + error.message;
  110. } finally {
  111. if (db !== null && db.State === 1) db.Close();
  112. }
  113. }
  114. function readCsvFile(path) {
  115. var fs = new ActiveXObject("Scripting.FileSystemObject");
  116. if (!fs.FileExists(path)) throw new Error("CSV file not found: " + path);
  117. if (fs.GetFile(path).Size > 2097152) throw new Error("CSV exceeds the 2 MB import limit");
  118. var stream = new ActiveXObject("ADODB.Stream");
  119. stream.Type = 2;
  120. stream.Charset = "utf-8";
  121. stream.Open();
  122. stream.LoadFromFile(path);
  123. var text = stream.ReadText();
  124. stream.Close();
  125. return text;
  126. }
  127. function emailLookup(db, tableName) {
  128. var found = {};
  129. var rows = db.Execute("SELECT [EmailKey] FROM [" + tableName + "]");
  130. while (!rows.EOF) {
  131. found[String(rows.Fields("EmailKey").Value).toLowerCase()] = true;
  132. rows.MoveNext();
  133. }
  134. rows.Close();
  135. return found;
  136. }
  137. function renderPreview(preview) {
  138. document.getElementById("previewCount").innerText = preview.accepted.length +
  139. " ready, " + preview.rejected.length + " rejected";
  140. var body = document.getElementById("previewBody");
  141. while (body.firstChild) body.removeChild(body.firstChild);
  142. var items = preview.accepted.concat(preview.rejected);
  143. items.sort(function (a, b) { return a.line - b.line; });
  144. for (var i = 0; i < items.length; i++) {
  145. var tr = document.createElement("tr");
  146. var values = [items[i].line, items[i].email, items[i].businessName,
  147. items[i].source, items[i].reason || "Ready"];
  148. for (var j = 0; j < values.length; j++) {
  149. var td = document.createElement("td");
  150. td.innerText = values[j];
  151. if (j === 4) td.className = items[i].reason ? "bad" : "good";
  152. tr.appendChild(td);
  153. }
  154. body.appendChild(tr);
  155. }
  156. document.getElementById("commitImport").disabled = preview.accepted.length === 0;
  157. }
  158. function previewContacts() {
  159. var db = null;
  160. document.getElementById("importMessage").innerText = "";
  161. document.getElementById("commitImport").disabled = true;
  162. try {
  163. var path = document.getElementById("csvPath").value;
  164. pendingPath = path;
  165. pendingSource = document.getElementById("sourceFallback").value.replace(/^\s+|\s+$/g, "");
  166. pendingCsvText = readCsvFile(path);
  167. var opened = openDatabase();
  168. db = opened.db;
  169. pendingPreview = MassMailerContacts.preview(pendingCsvText, pendingSource,
  170. emailLookup(db, "Contact"), emailLookup(db, "Suppression"));
  171. renderPreview(pendingPreview);
  172. } catch (error) {
  173. pendingPreview = null;
  174. document.getElementById("importMessage").innerText = error.message;
  175. } finally {
  176. if (db !== null && db.State === 1) db.Close();
  177. }
  178. }
  179. function utcNowSql() {
  180. return "DateAdd('n'," + new Date().getTimezoneOffset() + ",Now())";
  181. }
  182. function importOne(db, row) {
  183. var dateSql = utcNowSql();
  184. if (row.acquiredAt) {
  185. dateSql = "DateSerial(" + Number(row.acquiredAt.substring(0, 4)) + "," +
  186. Number(row.acquiredAt.substring(5, 7)) + "," +
  187. Number(row.acquiredAt.substring(8, 10)) + ")";
  188. }
  189. var cmd = new ActiveXObject("ADODB.Command");
  190. cmd.ActiveConnection = db;
  191. cmd.CommandText = "INSERT INTO [Contact] ([EmailOriginal],[EmailKey],[BusinessName]," +
  192. "[SourceReference],[AcquiredAtUtc],[Country],[EligibilityBasis],[CreatedAtUtc]) " +
  193. "VALUES (?,?,?,? ," + dateSql + ",'US','public_listing'," + utcNowSql() + ")";
  194. cmd.Parameters.Append(cmd.CreateParameter("email", 202, 1, 254, row.email));
  195. cmd.Parameters.Append(cmd.CreateParameter("key", 202, 1, 254, row.emailKey));
  196. cmd.Parameters.Append(cmd.CreateParameter("business", 202, 1, 200, row.businessName));
  197. cmd.Parameters.Append(cmd.CreateParameter("source", 203, 1, Math.max(1, row.source.length), row.source));
  198. cmd.Execute();
  199. }
  200. function commitContacts() {
  201. if (!pendingPreview || !pendingPreview.accepted.length) return;
  202. var db = null, inTransaction = false, succeeded = false;
  203. try {
  204. if (document.getElementById("csvPath").value !== pendingPath)
  205. throw new Error("CSV file selection changed. Preview it again.");
  206. if (document.getElementById("sourceFallback").value.replace(/^\s+|\s+$/g, "") !== pendingSource)
  207. throw new Error("Source reference changed. Preview the CSV again.");
  208. var opened = openDatabase();
  209. db = opened.db;
  210. var current = MassMailerContacts.preview(pendingCsvText, pendingSource,
  211. emailLookup(db, "Contact"), emailLookup(db, "Suppression"));
  212. if (current.accepted.length !== pendingPreview.accepted.length ||
  213. current.rejected.length !== pendingPreview.rejected.length)
  214. throw new Error("Contacts or suppressions changed. Preview the CSV again.");
  215. for (var check = 0; check < current.accepted.length; check++) {
  216. if (current.accepted[check].emailKey !== pendingPreview.accepted[check].emailKey)
  217. throw new Error("Contacts changed. Preview the CSV again.");
  218. }
  219. db.BeginTrans();
  220. inTransaction = true;
  221. for (var i = 0; i < current.accepted.length; i++) importOne(db, current.accepted[i]);
  222. db.CommitTrans();
  223. inTransaction = false;
  224. document.getElementById("importMessage").innerText =
  225. "Imported " + current.accepted.length + " contacts. Rejected rows were not saved.";
  226. pendingPreview = null;
  227. document.getElementById("commitImport").disabled = true;
  228. succeeded = true;
  229. } catch (error) {
  230. if (inTransaction) db.RollbackTrans();
  231. document.getElementById("importMessage").innerText = "Import failed: " + error.message;
  232. } finally {
  233. if (db !== null && db.State === 1) db.Close();
  234. if (succeeded) refreshStatus();
  235. }
  236. }
  237. function addSuppression() {
  238. var db = null, succeeded = false;
  239. try {
  240. var email = document.getElementById("suppressEmail").value.replace(/^\s+|\s+$/g, "");
  241. if (!MassMailerContacts.isEmail(email)) throw new Error("Enter a valid email address");
  242. var key = MassMailerContacts.emailKey(email);
  243. var reason = document.getElementById("suppressReason").value;
  244. var evidence = document.getElementById("suppressEvidence").value.replace(/^\s+|\s+$/g, "");
  245. var opened = openDatabase();
  246. db = opened.db;
  247. if (emailLookup(db, "Suppression")[key]) throw new Error("Address is already suppressed");
  248. var cmd = new ActiveXObject("ADODB.Command");
  249. cmd.ActiveConnection = db;
  250. cmd.CommandText = "INSERT INTO [Suppression] ([EmailKey],[Reason],[RecordedAtUtc]," +
  251. "[EvidenceReference]) VALUES (?, ?, " + utcNowSql() + ", ?)";
  252. cmd.Parameters.Append(cmd.CreateParameter("email", 202, 1, 254, key));
  253. cmd.Parameters.Append(cmd.CreateParameter("reason", 202, 1, 40, reason));
  254. cmd.Parameters.Append(cmd.CreateParameter("evidence", 203, 1, Math.max(1, evidence.length), evidence));
  255. cmd.Execute();
  256. document.getElementById("suppressMessage").innerText = "Suppressed " + key;
  257. document.getElementById("suppressEmail").value = "";
  258. succeeded = true;
  259. } catch (error) {
  260. document.getElementById("suppressMessage").innerText = "Suppression failed: " + error.message;
  261. } finally {
  262. if (db !== null && db.State === 1) db.Close();
  263. if (succeeded) refreshStatus();
  264. }
  265. }
  266. function powerShellHost() {
  267. var fs = new ActiveXObject("Scripting.FileSystemObject");
  268. var shell = new ActiveXObject("WScript.Shell");
  269. var root = shell.ExpandEnvironmentStrings("%SystemRoot%");
  270. var settings = readSettings(fs.BuildPath(projectRoot(), "config.ini"));
  271. var folder = (settings.DB_BITNESS || "").toLowerCase() === "x64" ? "System32" :
  272. (fs.FolderExists(root + "\\SysWOW64") ? "SysWOW64" : "System32");
  273. return root + "\\" + folder + "\\WindowsPowerShell\\v1.0\\powershell.exe";
  274. }
  275. function quoted(value) { return '"' + value + '"'; }
  276. function writeJsonFile(path, value) {
  277. var stream = new ActiveXObject("ADODB.Stream");
  278. try {
  279. stream.Type = 2;
  280. stream.Charset = "utf-8";
  281. stream.Open();
  282. stream.WriteText(JSON.stringify(value));
  283. stream.SaveToFile(path, 2);
  284. } finally { if (stream.State === 1) stream.Close(); }
  285. }
  286. function readJsonFile(path) {
  287. var stream = new ActiveXObject("ADODB.Stream");
  288. try {
  289. stream.Type = 2;
  290. stream.Charset = "utf-8";
  291. stream.Open();
  292. stream.LoadFromFile(path);
  293. return JSON.parse(stream.ReadText().replace(/^\uFEFF/, ""));
  294. } finally { if (stream.State === 1) stream.Close(); }
  295. }
  296. function finishHiddenTool(job) {
  297. var fs = new ActiveXObject("Scripting.FileSystemObject");
  298. var result;
  299. try {
  300. if (!fs.FileExists(job.resultPath)) throw new Error("Helper exited without a result");
  301. result = readJsonFile(job.resultPath);
  302. } finally {
  303. if (fs.FileExists(job.requestPath)) fs.DeleteFile(job.requestPath);
  304. if (fs.FileExists(job.resultPath)) fs.DeleteFile(job.resultPath);
  305. }
  306. if (!result.Success) throw new Error(result.Error || "Helper failed");
  307. return result.Output || "";
  308. }
  309. function startHiddenTool(scriptName, parameters, wait) {
  310. var fs = new ActiveXObject("Scripting.FileSystemObject");
  311. var folder = fs.BuildPath(projectRoot(), "temp");
  312. if (!fs.FolderExists(folder)) fs.CreateFolder(folder);
  313. var requestPath = fs.BuildPath(folder, fs.GetTempName() + ".request.json");
  314. var job = { requestPath: requestPath, resultPath: requestPath + ".result.json",
  315. startedAt: new Date().getTime(), warned: false };
  316. var bridge = fs.BuildPath(projectRoot(), "tools\\run-hidden-tool.ps1");
  317. var command = quoted(powerShellHost()) + " -NoProfile -ExecutionPolicy Bypass -File " +
  318. quoted(bridge) + " -RequestPath " + quoted(job.requestPath) +
  319. " -ResultPath " + quoted(job.resultPath);
  320. writeJsonFile(job.requestPath, { ScriptName: scriptName,
  321. ConfigPath: fs.BuildPath(projectRoot(), "config.ini"), Parameters: parameters || {} });
  322. try {
  323. new ActiveXObject("WScript.Shell").Run(command, 0, wait);
  324. return wait ? finishHiddenTool(job) : job;
  325. } catch (error) {
  326. if (fs.FileExists(job.requestPath)) fs.DeleteFile(job.requestPath);
  327. throw error;
  328. }
  329. }
  330. function configurePassword() {
  331. try {
  332. var fs = new ActiveXObject("Scripting.FileSystemObject");
  333. var script = fs.BuildPath(projectRoot(), "tools\\set-smtp-password.ps1");
  334. var command = quoted(powerShellHost()) + " -NoProfile -ExecutionPolicy Bypass -File " + quoted(script);
  335. var status = new ActiveXObject("WScript.Shell").Run(command, 1, true);
  336. document.getElementById("transportMessage").innerText = status === 0 ?
  337. "SMTP password setup completed." : "SMTP password setup failed. Review the console error.";
  338. } catch (error) {
  339. document.getElementById("transportMessage").innerText = "Setup failed: " + error.message;
  340. }
  341. }
  342. function sendInternalTest() {
  343. try {
  344. var fs = new ActiveXObject("Scripting.FileSystemObject");
  345. var settings = readSettings(fs.BuildPath(projectRoot(), "config.ini"));
  346. if (!settings.SMTP_TEST_TO) throw new Error("Set SMTP_TEST_TO in config.ini first");
  347. if (!window.confirm("Send one internal SMTP test to " + settings.SMTP_TEST_TO + "?")) return;
  348. document.getElementById("transportMessage").innerText =
  349. runTemplateTool("test-smtp-message.ps1", { Send: true });
  350. } catch (error) {
  351. document.getElementById("transportMessage").innerText = "Test failed: " + error.message;
  352. }
  353. }
  354. function refreshTemplates() {
  355. var db = null;
  356. try {
  357. db = openDatabase().db;
  358. var rows = db.Execute("SELECT [Id],[TemplateName],[VersionNumber] FROM [TemplateVersion] WHERE [ValidationStatus]='validated' ORDER BY [Id] DESC");
  359. var select = document.getElementById("templateVersion");
  360. var campaignSelect = document.getElementById("campaignTemplateVersion");
  361. while (select.options.length) select.remove(0);
  362. while (campaignSelect.options.length) campaignSelect.remove(0);
  363. while (!rows.EOF) {
  364. var value = String(rows.Fields("Id").Value);
  365. var label = String(rows.Fields("TemplateName").Value) + " — version " +
  366. String(rows.Fields("VersionNumber").Value);
  367. var option = document.createElement("option");
  368. option.value = value;
  369. option.text = label;
  370. select.add(option);
  371. var campaignOption = document.createElement("option");
  372. campaignOption.value = value;
  373. campaignOption.text = label;
  374. campaignSelect.add(campaignOption);
  375. rows.MoveNext();
  376. }
  377. rows.Close();
  378. invalidateCampaignReview();
  379. } catch (error) {
  380. document.getElementById("templateMessage").innerText = "Template list failed: " + error.message;
  381. } finally {
  382. if (db !== null && db.State === 1) db.Close();
  383. }
  384. }
  385. function runTemplateTool(scriptName, parameters) {
  386. return startHiddenTool(scriptName, parameters, true);
  387. }
  388. function importTemplate() {
  389. try {
  390. var path = document.getElementById("templatePath").value;
  391. if (!path || path.indexOf('"') !== -1) throw new Error("Select a template file");
  392. var result = runTemplateTool("import-template.ps1", { Path: path });
  393. document.getElementById("templateMessage").innerText = result;
  394. refreshTemplates();
  395. refreshStatus();
  396. } catch (error) {
  397. document.getElementById("templateMessage").innerText = "Import failed: " + error.message;
  398. }
  399. }
  400. function previewTemplate() {
  401. try {
  402. var id = document.getElementById("templateVersion").value;
  403. if (!/^[1-9][0-9]*$/.test(id)) throw new Error("Select an imported template");
  404. var file = runTemplateTool("preview-template.ps1", { TemplateId: Number(id) });
  405. document.getElementById("templatePreview").src = file;
  406. document.getElementById("templateMessage").innerText =
  407. "Showing the imported snapshot. This preview does not include the campaign footer yet.";
  408. } catch (error) {
  409. document.getElementById("templateMessage").innerText = "Preview failed: " + error.message;
  410. }
  411. }
  412. function refreshCampaigns() {
  413. var db = null;
  414. try {
  415. db = openDatabase().db;
  416. var rows = db.Execute("SELECT [Id],[Name],[Status] FROM [Campaign] ORDER BY [Id] DESC");
  417. var body = document.getElementById("campaignBody");
  418. while (body.firstChild) body.removeChild(body.firstChild);
  419. var select = document.getElementById("dispatchCampaign");
  420. var reportSelect = document.getElementById("reportCampaign");
  421. var selectedCampaign = select.value;
  422. var selectedReport = reportSelect.value;
  423. while (select.options.length) select.remove(0);
  424. while (reportSelect.options.length) reportSelect.remove(0);
  425. while (!rows.EOF) {
  426. var tr = document.createElement("tr");
  427. var values = [rows.Fields("Id").Value, rows.Fields("Name").Value,
  428. rows.Fields("Status").Value];
  429. for (var i = 0; i < values.length; i++) {
  430. var td = document.createElement("td");
  431. td.innerText = String(values[i]);
  432. tr.appendChild(td);
  433. }
  434. body.appendChild(tr);
  435. var reportOption = document.createElement("option");
  436. reportOption.value = String(values[0]);
  437. reportOption.text = "#" + values[0] + " " + values[1];
  438. reportSelect.add(reportOption);
  439. var status = String(values[2]);
  440. if (status === "approved_paused" || status === "running") {
  441. var option = document.createElement("option");
  442. option.value = String(values[0]);
  443. option.text = "#" + values[0] + " " + values[1] + " (" + status + ")";
  444. select.add(option);
  445. }
  446. rows.MoveNext();
  447. }
  448. rows.Close();
  449. for (var d = 0; d < select.options.length; d++) {
  450. if (select.options[d].value === selectedCampaign) select.selectedIndex = d;
  451. }
  452. for (var r = 0; r < reportSelect.options.length; r++) {
  453. if (reportSelect.options[r].value === selectedReport) reportSelect.selectedIndex = r;
  454. }
  455. refreshUncertain();
  456. } catch (error) {
  457. document.getElementById("campaignMessage").innerText = "Campaign list failed: " + error.message;
  458. } finally {
  459. if (db !== null && db.State === 1) db.Close();
  460. }
  461. }
  462. function invalidateCampaignReview() {
  463. pendingCampaignReview = null;
  464. campaignTestAccepted = false;
  465. document.getElementById("sendCampaignTest").disabled = true;
  466. document.getElementById("approveCampaign").disabled = true;
  467. document.getElementById("confirmReceived").checked = false;
  468. document.getElementById("confirmReceived").disabled = true;
  469. document.getElementById("campaignReview").innerText = "";
  470. document.getElementById("campaignPreview").src = "about:blank";
  471. }
  472. function campaignRequest() {
  473. return {
  474. Name: document.getElementById("campaignName").value,
  475. Subject: document.getElementById("campaignSubject").value,
  476. TemplateId: document.getElementById("campaignTemplateVersion").value,
  477. ReviewToken: pendingCampaignReview ? pendingCampaignReview.Token : "",
  478. TestReceived: document.getElementById("confirmReceived").checked
  479. };
  480. }
  481. function withCampaignRequest(scriptName, extraParameters) {
  482. var fs = new ActiveXObject("Scripting.FileSystemObject");
  483. var folder = fs.BuildPath(projectRoot(), "temp");
  484. if (!fs.FolderExists(folder)) fs.CreateFolder(folder);
  485. var path = fs.BuildPath(folder, fs.GetTempName());
  486. var stream = new ActiveXObject("ADODB.Stream");
  487. try {
  488. stream.Type = 2;
  489. stream.Charset = "utf-8";
  490. stream.Open();
  491. stream.WriteText(JSON.stringify(campaignRequest()));
  492. stream.SaveToFile(path, 2);
  493. stream.Close();
  494. var parameters = extraParameters || {};
  495. parameters.RequestPath = path;
  496. return runTemplateTool(scriptName, parameters);
  497. } finally {
  498. if (stream.State === 1) stream.Close();
  499. if (fs.FileExists(path)) fs.DeleteFile(path);
  500. }
  501. }
  502. function reviewCampaign() {
  503. invalidateCampaignReview();
  504. try {
  505. var data = JSON.parse(withCampaignRequest("review-campaign.ps1"));
  506. pendingCampaignReview = data;
  507. document.getElementById("campaignReview").innerText =
  508. data.Count + " eligible recipients. From: " + data.From + ". Reply-to: " +
  509. data.ReplyTo + ". Postal address: " + data.PostalAddress +
  510. ". Template: " + data.TemplateName + " v" + data.TemplateVersion +
  511. ". Subject: " + data.Subject + ".";
  512. document.getElementById("campaignPreview").src = data.PreviewPath;
  513. document.getElementById("sendCampaignTest").disabled = false;
  514. document.getElementById("campaignMessage").innerText =
  515. "Review the full message, then send it to the internal test inbox.";
  516. } catch (error) {
  517. document.getElementById("campaignMessage").innerText = "Review failed: " + error.message;
  518. }
  519. }
  520. function sendReviewedCampaignTest() {
  521. if (!pendingCampaignReview) return;
  522. if (!window.confirm("Send this campaign test to " + pendingCampaignReview.TestTo + "?")) return;
  523. try {
  524. var result = withCampaignRequest("send-campaign-test.ps1", { Send: true });
  525. campaignTestAccepted = true;
  526. document.getElementById("confirmReceived").disabled = false;
  527. document.getElementById("campaignMessage").innerText = result;
  528. } catch (error) {
  529. document.getElementById("campaignMessage").innerText = "Campaign test failed: " + error.message;
  530. }
  531. }
  532. function updateApprovalButton() {
  533. document.getElementById("approveCampaign").disabled =
  534. !pendingCampaignReview || !campaignTestAccepted ||
  535. !document.getElementById("confirmReceived").checked;
  536. }
  537. function approveReviewedCampaign() {
  538. if (!pendingCampaignReview || !campaignTestAccepted ||
  539. !document.getElementById("confirmReceived").checked) return;
  540. if (!window.confirm("Approve " + pendingCampaignReview.Count +
  541. " recipients? The campaign will remain paused.")) return;
  542. try {
  543. var result = withCampaignRequest("approve-campaign.ps1");
  544. document.getElementById("campaignMessage").innerText = result;
  545. invalidateCampaignReview();
  546. refreshStatus();
  547. refreshCampaigns();
  548. } catch (error) {
  549. document.getElementById("campaignMessage").innerText = "Approval failed: " + error.message;
  550. }
  551. }
  552. function htaProcessId() {
  553. var service = new ActiveXObject("WbemScripting.SWbemLocator")
  554. .ConnectServer(".", "root\\cimv2");
  555. var rows = new Enumerator(service.ExecQuery(
  556. "SELECT ProcessId,CommandLine FROM Win32_Process WHERE Name='mshta.exe'"));
  557. var path = projectRoot().toLowerCase();
  558. for (; !rows.atEnd(); rows.moveNext()) {
  559. var row = rows.item();
  560. var command = String(row.CommandLine).toLowerCase();
  561. if (command.indexOf("massmailer.hta") !== -1 && command.indexOf(path) !== -1)
  562. return Number(row.ProcessId);
  563. }
  564. throw new Error("Could not identify this HTA process for the open-window send guard");
  565. }
  566. function writeHeartbeat() {
  567. if (!dispatchReady) return;
  568. var fs = new ActiveXObject("Scripting.FileSystemObject");
  569. var file = fs.CreateTextFile(dispatchSessionPath, true);
  570. file.Write(dispatchSessionToken);
  571. file.Close();
  572. }
  573. function startup() {
  574. try {
  575. showTab("overview");
  576. refreshStatus();
  577. refreshTemplates();
  578. refreshCampaigns();
  579. initializeDispatch();
  580. } catch (error) {
  581. document.getElementById("dispatchMessage").innerText =
  582. "Startup failed: " + error.message;
  583. }
  584. }
  585. function showTab(name) {
  586. var panes = document.querySelectorAll(".tab-pane");
  587. var buttons = document.querySelectorAll(".tab-button");
  588. for (var i = 0; i < panes.length; i++) {
  589. var paneActive = panes[i].getAttribute("data-tab") === name;
  590. var paneBase = panes[i].getAttribute("data-tab") === "overview" ? "" : "panel ";
  591. panes[i].className = paneBase + (paneActive ? "tab-pane active" : "tab-pane");
  592. panes[i].setAttribute("aria-hidden", paneActive ? "false" : "true");
  593. }
  594. for (var j = 0; j < buttons.length; j++) {
  595. var buttonActive = buttons[j].getAttribute("data-tab") === name;
  596. buttons[j].className = buttonActive ? "tab-button active" : "tab-button";
  597. buttons[j].setAttribute("aria-selected", buttonActive ? "true" : "false");
  598. }
  599. window.scrollTo(0, 0);
  600. }
  601. function initializeDispatch() {
  602. if (dispatchReady) return;
  603. try {
  604. var fs = new ActiveXObject("Scripting.FileSystemObject");
  605. var folder = fs.BuildPath(projectRoot(), "temp");
  606. if (!fs.FolderExists(folder)) fs.CreateFolder(folder);
  607. document.getElementById("dispatchMessage").innerText =
  608. runTemplateTool("dispatch-control.ps1", { Action: "Recover" });
  609. dispatchSessionPid = htaProcessId();
  610. dispatchSessionToken = "";
  611. for (var i = 0; i < 32; i++)
  612. dispatchSessionToken += "0123456789abcdef".charAt(Math.floor(Math.random() * 16));
  613. dispatchSessionPath = fs.BuildPath(folder, "session-" + dispatchSessionPid + ".txt");
  614. dispatchReady = true;
  615. writeHeartbeat();
  616. if (dispatchTimerId === null)
  617. dispatchTimerId = window.setInterval(dispatchTick, 5000);
  618. document.getElementById("retryDispatch").disabled = true;
  619. document.getElementById("reviewOptOut").disabled = false;
  620. document.getElementById("resumeCampaign").disabled = false;
  621. document.getElementById("pauseAll").disabled = false;
  622. document.getElementById("cancelCampaign").disabled = false;
  623. refreshCampaigns();
  624. refreshDispatchStatus();
  625. } catch (error) {
  626. dispatchReady = false;
  627. document.getElementById("dispatchMessage").innerText =
  628. "Dispatcher did not initialize: " + error.message;
  629. }
  630. }
  631. function shutdownDispatch() {
  632. dispatchReady = false;
  633. try {
  634. if (dispatchTimerId !== null) window.clearInterval(dispatchTimerId);
  635. var fs = new ActiveXObject("Scripting.FileSystemObject");
  636. if (dispatchSessionPath && fs.FileExists(dispatchSessionPath))
  637. fs.DeleteFile(dispatchSessionPath);
  638. runTemplateTool("dispatch-control.ps1", { Action: "PauseAll" });
  639. } catch (ignored) { }
  640. }
  641. function refreshDispatchStatus() {
  642. if (!dispatchReady || dispatchProcess) return;
  643. try {
  644. var status = JSON.parse(runTemplateTool("dispatch-control.ps1", { Action: "Status" }));
  645. document.getElementById("sendState").innerText = status.Paused ?
  646. "Paused" : "Running " + status.RunningCampaigns + " campaign(s)";
  647. document.getElementById("dispatchSummary").innerText =
  648. "Pending " + status.Counts.pending + ", accepted " + status.Counts.accepted +
  649. ", uncertain " + status.Counts.uncertain + ", suppressed " +
  650. status.Counts.suppressed + ". Next allowed attempt (UTC): " +
  651. (status.NextAllowedAttemptUtc || "Now") + ".";
  652. } catch (error) {
  653. document.getElementById("dispatchMessage").innerText =
  654. "Dispatch status failed: " + error.message;
  655. }
  656. }
  657. function dispatchTick() {
  658. if (!dispatchReady) return;
  659. try {
  660. writeHeartbeat();
  661. var fs = new ActiveXObject("Scripting.FileSystemObject");
  662. if (dispatchProcess) {
  663. if (!fs.FileExists(dispatchProcess.resultPath)) {
  664. if (!dispatchProcess.warned &&
  665. new Date().getTime() - dispatchProcess.startedAt > 60000) {
  666. dispatchProcess.warned = true;
  667. document.getElementById("dispatchMessage").innerText =
  668. "Sending helper has not returned. No further attempts will start until it finishes; pause and review the campaign.";
  669. }
  670. return;
  671. }
  672. var finished = dispatchProcess;
  673. dispatchProcess = null;
  674. try {
  675. document.getElementById("dispatchMessage").innerText = finishHiddenTool(finished);
  676. } catch (error) {
  677. document.getElementById("dispatchMessage").innerText =
  678. "Dispatch error: " + error.message;
  679. }
  680. refreshStatus();
  681. refreshCampaigns();
  682. refreshDispatchStatus();
  683. return;
  684. }
  685. var db = openDatabase().db;
  686. var running = 0;
  687. try {
  688. var rows = db.Execute("SELECT COUNT(*) AS N FROM [Campaign] WHERE [Status]='running'");
  689. running = Number(rows.Fields("N").Value);
  690. rows.Close();
  691. } finally { db.Close(); }
  692. if (!running) return;
  693. dispatchProcess = startHiddenTool("dispatch-once.ps1", { Send: true,
  694. SessionPid: dispatchSessionPid, SessionToken: dispatchSessionToken }, false);
  695. } catch (error) {
  696. document.getElementById("dispatchMessage").innerText =
  697. "Dispatch tick failed: " + error.message;
  698. }
  699. }
  700. function dispatchControl(action, campaignId, deliveryId) {
  701. try {
  702. var parameters = { Action: action };
  703. if (campaignId) parameters.CampaignId = Number(campaignId);
  704. if (deliveryId) parameters.DeliveryId = Number(deliveryId);
  705. var result = runTemplateTool("dispatch-control.ps1", parameters);
  706. document.getElementById("dispatchMessage").innerText = result;
  707. refreshCampaigns();
  708. refreshUncertain();
  709. refreshDispatchStatus();
  710. } catch (error) {
  711. document.getElementById("dispatchMessage").innerText =
  712. "Control failed: " + error.message;
  713. }
  714. }
  715. function reviewOptOutMailbox() {
  716. if (window.confirm("Have you checked the monitored reply mailbox and recorded all opt-outs?"))
  717. dispatchControl("ReviewOptOut", 0);
  718. }
  719. function selectedDispatchCampaign() {
  720. var id = document.getElementById("dispatchCampaign").value;
  721. if (!/^[1-9][0-9]*$/.test(id)) throw new Error("Select an approved campaign");
  722. return id;
  723. }
  724. function resumeSelectedCampaign() {
  725. try {
  726. var id = selectedDispatchCampaign();
  727. if (window.confirm("Start sending campaign #" + id +
  728. " to approved business contacts while this HTA stays open?"))
  729. dispatchControl("Resume", id);
  730. } catch (error) { document.getElementById("dispatchMessage").innerText = error.message; }
  731. }
  732. function testApprovedCampaign() {
  733. try {
  734. var id = selectedDispatchCampaign();
  735. var fs = new ActiveXObject("Scripting.FileSystemObject");
  736. var settings = readSettings(fs.BuildPath(projectRoot(), "config.ini"));
  737. if (!settings.SMTP_TEST_TO) throw new Error("Set SMTP_TEST_TO in config.ini first");
  738. if (!window.confirm("Send a test of approved campaign #" + id +
  739. " to " + settings.SMTP_TEST_TO + " only?")) return;
  740. document.getElementById("dispatchMessage").innerText =
  741. runTemplateTool("send-approved-campaign-test.ps1", { CampaignId: Number(id), Send: true });
  742. } catch (error) {
  743. document.getElementById("dispatchMessage").innerText =
  744. "Approved campaign test failed: " + error.message;
  745. }
  746. }
  747. function cancelSelectedCampaign() {
  748. try {
  749. var id = selectedDispatchCampaign();
  750. if (window.confirm("Cancel all pending deliveries in campaign #" + id + "?"))
  751. dispatchControl("Cancel", id);
  752. } catch (error) { document.getElementById("dispatchMessage").innerText = error.message; }
  753. }
  754. function refreshUncertain() {
  755. var db = null;
  756. try {
  757. db = openDatabase().db;
  758. var rows = db.Execute("SELECT [Id],[CampaignId],[EmailKey],[AttemptCount] FROM [Delivery] WHERE [Status]='uncertain' ORDER BY [Id]");
  759. var select = document.getElementById("uncertainDelivery");
  760. var selectedDelivery = select.value;
  761. while (select.options.length) select.remove(0);
  762. while (!rows.EOF) {
  763. var option = document.createElement("option");
  764. option.value = String(rows.Fields("Id").Value);
  765. option.text = "Delivery #" + option.value + " / campaign #" +
  766. rows.Fields("CampaignId").Value + " / " + rows.Fields("EmailKey").Value +
  767. " / attempts " + rows.Fields("AttemptCount").Value;
  768. select.add(option);
  769. rows.MoveNext();
  770. }
  771. rows.Close();
  772. for (var i = 0; i < select.options.length; i++) {
  773. if (select.options[i].value === selectedDelivery) select.selectedIndex = i;
  774. }
  775. } catch (error) {
  776. document.getElementById("dispatchMessage").innerText =
  777. "Uncertain list failed: " + error.message;
  778. } finally {
  779. if (db !== null && db.State === 1) db.Close();
  780. }
  781. }
  782. function reconcileDelivery(action) {
  783. var id = document.getElementById("uncertainDelivery").value;
  784. if (!/^[1-9][0-9]*$/.test(id)) {
  785. document.getElementById("dispatchMessage").innerText = "Select an uncertain delivery.";
  786. return;
  787. }
  788. var prompt = action === "ResolveAccepted" ?
  789. "Have you verified delivery #" + id + " was accepted by the provider?" :
  790. "Have you checked that delivery #" + id + " was not sent and authorize one retry?";
  791. if (window.confirm(prompt)) dispatchControl(action, 0, id);
  792. }
  793. function exportSelectedReport() {
  794. try {
  795. var id = document.getElementById("reportCampaign").value;
  796. if (!/^[1-9][0-9]*$/.test(id)) throw new Error("Select a campaign to report");
  797. document.getElementById("reportMessage").innerText =
  798. runTemplateTool("export-report.ps1", { CampaignId: Number(id) });
  799. } catch (error) {
  800. document.getElementById("reportMessage").innerText =
  801. "Report export failed: " + error.message;
  802. }
  803. }
  804. </script>
  805. </head>
  806. <body onload="startup()" onunload="shutdownDispatch()">
  807. <header><h1>MassMailer</h1><p>9 x 12 postcard marketing campaign workspace</p></header>
  808. <main>
  809. <div class="tabbar" role="tablist" aria-label="Application sections">
  810. <button type="button" class="tab-button" data-tab="overview" role="tab" onclick="showTab('overview')">Overview</button>
  811. <button type="button" class="tab-button" data-tab="smtp" role="tab" onclick="showTab('smtp')">SMTP</button>
  812. <button type="button" class="tab-button" data-tab="contacts" role="tab" onclick="showTab('contacts')">Contacts</button>
  813. <button type="button" class="tab-button" data-tab="templates" role="tab" onclick="showTab('templates')">Templates</button>
  814. <button type="button" class="tab-button" data-tab="campaigns" role="tab" onclick="showTab('campaigns')">Campaigns</button>
  815. <button type="button" class="tab-button" data-tab="sending" role="tab" onclick="showTab('sending')">Sending</button>
  816. <button type="button" class="tab-button" data-tab="reports" role="tab" onclick="showTab('reports')">Reports</button>
  817. </div>
  818. <div class="tab-pane" data-tab="overview" role="tabpanel">
  819. <div class="notice"><strong>Campaigns start only when you explicitly resume them.</strong> Sending stops when this window closes. Review replies and record opt-outs before resuming.</div>
  820. <div class="cards">
  821. <div class="card">Contacts<span class="number" id="contacts">—</span></div>
  822. <div class="card">Suppressed<span class="number" id="suppressed">—</span></div>
  823. <div class="card">Templates<span class="number" id="templates">—</span></div>
  824. <div class="card">Campaigns<span class="number" id="campaigns">—</span></div>
  825. </div>
  826. <div class="details">
  827. <div><strong>Database</strong><span id="database">Checking…</span></div>
  828. <div><strong>Provider</strong><span id="provider">Checking…</span></div>
  829. <div><strong>Send interval</strong><span id="interval">Checking…</span></div>
  830. <div><strong>Internal test to</strong><span id="testTo">Checking…</span></div>
  831. <div><strong>Send state</strong><span id="sendState">Initializing…</span></div>
  832. <button onclick="refreshStatus()">Refresh status</button>
  833. <div id="error"></div>
  834. </div>
  835. </div>
  836. <div class="panel tab-pane" data-tab="smtp" role="tabpanel">
  837. <h2>SMTP setup and internal test</h2>
  838. <p>The password entry opens a local console and stores a protected value in the MDB. The test sends one HTML message with an inline image to the configured test inbox.</p>
  839. <button onclick="configurePassword()">Set or rotate SMTP password</button>
  840. <button onclick="sendInternalTest()">Send one internal test</button>
  841. <div id="transportMessage"></div>
  842. </div>
  843. <div class="panel tab-pane" data-tab="contacts" role="tabpanel">
  844. <h2>Import business contacts</h2>
  845. <p>UTF-8 CSV needs an <code>email</code> header. Optional headers: <code>business_name</code>, <code>source_reference</code>, and <code>acquired_at</code> (YYYY-MM-DD). Every accepted row needs a source reference.</p>
  846. <label class="field">CSV file <input id="csvPath" type="file" accept=".csv" /></label>
  847. <label class="field">Source URL or reference for rows without one
  848. <input id="sourceFallback" type="text" maxlength="2048" /></label>
  849. <button onclick="previewContacts()">Preview import</button>
  850. <button id="commitImport" onclick="commitContacts()" disabled="disabled">Import ready contacts</button>
  851. <div id="importMessage"></div>
  852. <p id="previewCount"></p>
  853. <table><thead><tr><th>CSV row</th><th>Email</th><th>Business</th><th>Source</th><th>Result</th></tr></thead>
  854. <tbody id="previewBody"></tbody></table>
  855. </div>
  856. <div class="panel tab-pane" data-tab="templates" role="tabpanel">
  857. <h2>HTML templates</h2>
  858. <p>Choose a well-formed HTML file inside the configured template folder. Images must use relative PNG, JPEG, or GIF paths. Imports create a new version and copy image bytes into the database.</p>
  859. <label class="field">Template file <input id="templatePath" type="file" accept=".html,.htm" /></label>
  860. <button onclick="importTemplate()">Import template version</button>
  861. <label class="field">Imported version <select id="templateVersion"></select></label>
  862. <button onclick="previewTemplate()">Preview selected version</button>
  863. <div id="templateMessage"></div>
  864. <iframe id="templatePreview" APPLICATION="no" title="Template preview"></iframe>
  865. </div>
  866. <div class="panel tab-pane" data-tab="campaigns" role="tabpanel">
  867. <h2>Review and approve a campaign</h2>
  868. <p>Approval captures currently eligible contacts and the selected template version. It requires a complete postal address in config.ini, a campaign-specific internal test, and your confirmation that you received it. Approved campaigns stay paused until you resume them.</p>
  869. <label class="field">Campaign name <input id="campaignName" type="text" maxlength="200" oninput="invalidateCampaignReview()" /></label>
  870. <label class="field">Email subject <input id="campaignSubject" type="text" maxlength="240" oninput="invalidateCampaignReview()" /></label>
  871. <label class="field">Template version <select id="campaignTemplateVersion" onchange="invalidateCampaignReview()"></select></label>
  872. <button onclick="reviewCampaign()">Review message and recipients</button>
  873. <div id="campaignReview"></div>
  874. <iframe id="campaignPreview" APPLICATION="no" title="Full campaign preview"></iframe>
  875. <button id="sendCampaignTest" onclick="sendReviewedCampaignTest()" disabled="disabled">Send reviewed message to internal test inbox</button>
  876. <label class="field"><input id="confirmReceived" type="checkbox" disabled="disabled" onchange="updateApprovalButton()" style="display:inline;width:auto" /> I received and checked the campaign test message.</label>
  877. <button id="approveCampaign" onclick="approveReviewedCampaign()" disabled="disabled">Approve campaign (paused)</button>
  878. <div id="campaignMessage"></div>
  879. <table><thead><tr><th>ID</th><th>Campaign</th><th>Status</th></tr></thead><tbody id="campaignBody"></tbody></table>
  880. </div>
  881. <div class="panel tab-pane" data-tab="sending" role="tabpanel">
  882. <h2>Open-window sending</h2>
  883. <p>Check the reply mailbox daily. A send starts only while this HTA is open, after you explicitly resume an approved campaign. The configured interval applies across campaigns. Uncertain results pause sending for review.</p>
  884. <button id="reviewOptOut" onclick="reviewOptOutMailbox()" disabled="disabled">I reviewed replies and recorded opt-outs</button>
  885. <label class="field">Approved campaign <select id="dispatchCampaign"></select></label>
  886. <button onclick="testApprovedCampaign()">Send selected campaign test to internal inbox</button>
  887. <button id="resumeCampaign" onclick="resumeSelectedCampaign()" disabled="disabled">Resume selected campaign</button>
  888. <button id="pauseAll" onclick="dispatchControl('PauseAll',0)" disabled="disabled">Pause all</button>
  889. <button id="cancelCampaign" onclick="cancelSelectedCampaign()" disabled="disabled">Cancel selected campaign</button>
  890. <div id="dispatchSummary"></div>
  891. <div id="dispatchMessage"></div>
  892. <button id="retryDispatch" onclick="initializeDispatch()">Retry dispatcher initialization</button>
  893. <label class="field">Uncertain delivery <select id="uncertainDelivery"></select></label>
  894. <button onclick="reconcileDelivery('ResolveAccepted')">Mark verified accepted</button>
  895. <button onclick="reconcileDelivery('AuthorizeRetry')">Authorize one retry</button>
  896. </div>
  897. <div class="panel tab-pane" data-tab="contacts" role="tabpanel">
  898. <h2>Suppress an address</h2>
  899. <p>Add unsubscribe replies here before the next send. Suppression applies across all campaigns.</p>
  900. <label class="field">Email address <input id="suppressEmail" type="text" maxlength="254" /></label>
  901. <label class="field">Reason <select id="suppressReason"><option value="opt-out">Opt-out reply</option><option value="manual">Manual</option><option value="bounce">Hard bounce</option><option value="complaint">Complaint</option></select></label>
  902. <label class="field">Evidence or note <input id="suppressEvidence" type="text" maxlength="2048" /></label>
  903. <button onclick="addSuppression()">Suppress address</button>
  904. <div id="suppressMessage"></div>
  905. </div>
  906. <div class="panel tab-pane" data-tab="reports" role="tabpanel">
  907. <h2>Campaign reports</h2>
  908. <p>Export delivery statuses and attempt history to CSV files in the configured report folder. SMTP acceptance means the server accepted a message; it does not confirm inbox delivery.</p>
  909. <label class="field">Campaign <select id="reportCampaign"></select></label>
  910. <button onclick="exportSelectedReport()">Export campaign CSV reports</button>
  911. <div id="reportMessage"></div>
  912. </div>
  913. </main>
  914. </body>
  915. </html>

Powered by TurnKey Linux.