thai_qr_pay 0.2.0 → 0.2.1

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 828bc541d1777d62f81d272d8da35181725baaebc3f574ca4d4b4a0db45685c4
-  data.tar.gz: 7884145360ea3e7b7cb069b3c5a028f766dadedf6cb903e8eefaf4122a573dd1
+  metadata.gz: c9e83575512379820fcca739aa2ab4573f63f78c354aded6b6537e3fc70c4b0a
+  data.tar.gz: 19caeb222f1a43ef42d2cc6438f928f6b519e5f7df0b04647e3f79ae2546f416
 SHA512:
-  metadata.gz: fac8a555db8d8abc8de436fcedd38894914d369ba25d2688144e1b7b9694c15a01acbd862983617878d7a2f87db6439d60962cf1b28ae0d9918b553ddcb043ff
-  data.tar.gz: 50fbc9afbc67f268598d07b527e4031447f6961171c934a8443eb4a639de6328ad1b60a223c3f571f5190b1de37cbce2006fb0bf5ea600736e50804db3b08803
+  metadata.gz: fde0294a52a30ab085e58dbbe24bd2bcf1535b14b2196b2af37651133d2625a0ecb66cf7e0047c56424f23f10ef548796e29d5cc7d39a342d90ec8b6ec651c98
+  data.tar.gz: 1e4dcc046453c564d9a77c176ef3cd8a662ae832351888887c13085349df84408d00c891223d3c8f86f8864c69a7e029fd5c46a0f86ad947b57493d8c215bb65

data/lib/thai_qr_pay/generate/promptpay/any_id.rb

@@ -21,8 +21,8 @@ module ThaiQrPay
           raise Error, 'Unknown type' unless PROXY.key?(type)
 
           if type == 'MSISDN'
-            # replace leading 0 with 66
-            target = target.sub(/^0/, '66')
+            t = target.sub(/^0/, '66')
+            target = t.rjust(13, '0')
           end
 
           sub = [

data/lib/thai_qr_pay/generate/slip_verify.rb

@@ -0,0 +1,25 @@
+# frozen_string_literal: true
+
+require 'thai_qr_pay/tlv'
+require 'thai_qr_pay/crc16'
+
+module ThaiQrPay
+  module Generate
+    # Generates an EMVCo “slip verify” (mini-QR) payload
+    # Tag 00 = sub-TLV [000001, sendingBank, transRef], Tag 51 = 'TH', CRC tag = '91'
+    class SlipVerify
+      def self.payload(sending_bank:, trans_ref:)
+        inner = [
+          TLV.tag('00', '000001'),
+          TLV.tag('01', sending_bank),
+          TLV.tag('02', trans_ref)
+        ]
+        payload = [
+          TLV.tag('00', TLV.encode(inner)),
+          TLV.tag('51', 'TH')
+        ]
+        CRC16.with_crc(TLV.encode(payload), '91')
+      end
+    end
+  end
+end

data/lib/thai_qr_pay/generate/true_money.rb

@@ -0,0 +1,45 @@
+# frozen_string_literal: true
+
+require 'thai_qr_pay/tlv'
+require 'thai_qr_pay/crc16'
+
+module ThaiQrPay
+  module Generate
+    # Generates a TrueMoney “wallet” PromptPay-compatible QR
+    # Tag 29 = sub-TLV [A000000677010111, '03'+mobileNo], optional Tag 54 & Tag 81, CRC tag = '63'
+    class TrueMoney
+      def self.payload(mobile_no:, amount: nil, message: nil)
+        tag29 = TLV.encode([
+                             TLV.tag('00', 'A000000677010111'),
+                             TLV.tag('03', "14000#{mobile_no}")
+                           ])
+
+        main = [
+          TLV.tag('00', '01'),
+          TLV.tag('01', amount ? '12' : '11'),
+          TLV.tag('29', tag29),
+          TLV.tag('53', '764'),
+          TLV.tag('58', 'TH')
+        ]
+        main << TLV.tag('54', format('%.2f', amount)) if amount
+
+        if message
+          # Tag 81 is UCS-2 BE hex of the message
+          encoded = encode_tag81(message)
+          main << TLV.tag('81', encoded)
+        end
+
+        CRC16.with_crc(TLV.encode(main), '63')
+      end
+
+      # @api private
+      def self.encode_tag81(message)
+        # TS: Buffer.from(msg,'utf16le').swap16().toString('hex').toUpperCase()
+        utf16le = message.encode('utf-16le')
+        # swap each pair of bytes
+        be_bytes = utf16le.bytes.each_slice(2).flat_map { |lo, hi| [hi, lo] }
+        be_bytes.pack('C*').unpack1('H*').upcase
+      end
+    end
+  end
+end

data/lib/thai_qr_pay/generate/true_money_slip_verify.rb

@@ -0,0 +1,25 @@
+# frozen_string_literal: true
+
+require 'thai_qr_pay/tlv'
+require 'thai_qr_pay/crc16'
+
+module ThaiQrPay
+  module Generate
+    # Generates a TrueMoney-specific slip-verify QR
+    # Tag 00 = sub-TLV [01,01,eventType,transactionId,date], CRC tag = '91'
+    class TrueMoneySlipVerify
+      def self.payload(event_type:, transaction_id:, date:)
+        inner = [
+          TLV.tag('00', '01'),
+          TLV.tag('01', '01'),
+          TLV.tag('02', event_type),
+          TLV.tag('03', transaction_id),
+          TLV.tag('04', date)
+        ]
+        payload = [TLV.tag('00', TLV.encode(inner))]
+        # per TS, CRC-tag '91', case-sensitive (we output uppercase)
+        CRC16.with_crc(TLV.encode(payload), '91')
+      end
+    end
+  end
+end

data/lib/thai_qr_pay/version.rb

@@ -2,5 +2,5 @@
 # frozen_string_literal: true
 
 module ThaiQrPay
-  VERSION = '0.2.0'
+  VERSION = '0.2.1'
 end

data/spec/generate/slip_verify_spec.rb

@@ -0,0 +1,36 @@
+# frozen_string_literal: true
+
+require 'thai_qr_pay/generate/slip_verify'
+require 'thai_qr_pay/tlv'
+require 'thai_qr_pay/crc16'
+
+RSpec.describe ThaiQrPay::Generate::SlipVerify do
+  let(:bank) { 'KBank' }
+  let(:ref)  { 'ABC123' }
+
+  subject(:payload) { described_class.payload(sending_bank: bank, trans_ref: ref) }
+
+  it 'returns a string' do
+    expect(payload).to be_a(String)
+  end
+
+  it 'contains Tag 00, Tag 51, and CRC Tag 91' do
+    tags = ThaiQrPay::TLV.decode(payload)
+    expect(tags.map(&:id)).to include('00', '51', '91')
+    tag51 = tags.find { |t| t.id == '51' }
+    expect(tag51.value).to eq('TH')
+  end
+
+  it 'embeds sending_bank and trans_ref as subtags of Tag 00' do
+    tag00 = ThaiQrPay::TLV.decode(payload).find { |t| t.id == '00' }
+    subtags = ThaiQrPay::TLV.decode(tag00.value)
+    expect(subtags.find { |st| st.id == '01' }.value).to eq(bank)
+    expect(subtags.find { |st| st.id == '02' }.value).to eq(ref)
+  end
+
+  it 'appends correct CRC using tag 91' do
+    body = payload[0..-5] # everything before the CRC hex
+    expected = ThaiQrPay::CRC16.checksum(body)
+    expect(payload).to end_with("9104#{expected}")
+  end
+end

data/spec/generate/true_money_slip_verify_spec.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+require 'thai_qr_pay/generate/true_money_slip_verify'
+require 'thai_qr_pay/tlv'
+require 'thai_qr_pay/crc16'
+
+RSpec.describe ThaiQrPay::Generate::TrueMoneySlipVerify do
+  let(:event) { 'PAYMENT' }
+  let(:txid)  { 'TX123456' }
+  let(:date)  { '20250615' }
+
+  subject(:payload) { described_class.payload(event_type: event, transaction_id: txid, date: date) }
+
+  it 'produces exactly two tags: 00 and 91' do
+    tags = ThaiQrPay::TLV.decode(payload)
+    expect(tags.map(&:id)).to eq(%w[00 91])
+  end
+
+  it 'nests subtags 00..04 correctly under Tag 00' do
+    inner = ThaiQrPay::TLV.decode(payload).find { |t| t.id == '00' }
+    subtags = ThaiQrPay::TLV.decode(inner.value)
+    expect(subtags.map(&:id)).to eq(%w[00 01 02 03 04])
+    expect(subtags.find { |st| st.id == '02' }.value).to eq(event)
+    expect(subtags.find { |st| st.id == '03' }.value).to eq(txid)
+    expect(subtags.find { |st| st.id == '04' }.value).to eq(date)
+  end
+
+  it 'appends correct CRC using Tag 91' do
+    body     = payload[0..-5]
+    expected = ThaiQrPay::CRC16.checksum(body)
+    expect(payload).to end_with("9104#{expected}")
+  end
+end

data/spec/generate/true_money_spec.rb

@@ -0,0 +1,79 @@
+# frozen_string_literal: true
+
+require 'thai_qr_pay/generate/true_money'
+require 'thai_qr_pay/tlv'
+require 'thai_qr_pay/crc16'
+
+RSpec.describe ThaiQrPay::Generate::TrueMoney do
+  let(:mobile)  { '0812345678' }
+  let(:amount)  { 123.45 }
+  let(:message) { 'Hello' }
+
+  context 'without amount or message' do
+    subject(:payload) { described_class.payload(mobile_no: mobile) }
+
+    it 'uses point-of-initiation 11' do
+      tag01 = ThaiQrPay::TLV.decode(payload).find { |t| t.id == '01' }
+      expect(tag01.value).to eq('11')
+    end
+
+    it 'includes correct sub-tags in Tag 29' do
+      sub = ThaiQrPay::TLV.decode(payload).find { |t| t.id == '29' }
+      subtags = ThaiQrPay::TLV.decode(sub.value)
+      expect(subtags.find { |st| st.id == '00' }.value).to eq('A000000677010111')
+      expect(subtags.find { |st| st.id == '03' }.value).to eq("14000#{mobile}")
+    end
+
+    it 'does not include Tag 54 nor Tag 81' do
+      tags = ThaiQrPay::TLV.decode(payload)
+      ids  = tags.map(&:id)
+      expect(ids).not_to include('54')
+      expect(ids).not_to include('81')
+    end
+
+    it 'ends with CRC Tag 63' do
+      expect(payload).to match(/63..[0-9A-F]{4}\z/)
+    end
+  end
+
+  context 'with amount only' do
+    subject(:payload) { described_class.payload(mobile_no: mobile, amount: amount) }
+
+    it 'uses point-of-initiation 12' do
+      tag01 = ThaiQrPay::TLV.decode(payload).find { |t| t.id == '01' }
+      expect(tag01.value).to eq('12')
+    end
+
+    it 'includes Tag 54 formatted to two decimals' do
+      tag54 = ThaiQrPay::TLV.decode(payload).find { |t| t.id == '54' }
+      expect(tag54.value).to eq('123.45')
+    end
+
+    it 'does not include Tag 81' do
+      ids = ThaiQrPay::TLV.decode(payload).map(&:id)
+      expect(ids).not_to include('81')
+    end
+  end
+
+  context 'with message only' do
+    subject(:payload) { described_class.payload(mobile_no: mobile, message: message) }
+
+    it 'includes Tag 81 with UCS-2 BE hex value' do
+      tag81 = ThaiQrPay::TLV.decode(payload).find { |t| t.id == '81' }
+      # "Hello" in UCS-2 BE hex:
+      expect(tag81.value).to eq('00480065006C006C006F')
+    end
+
+    it 'does not include Tag 54' do
+      expect(payload).not_to include('54')
+    end
+  end
+
+  context 'with both amount and message' do
+    subject(:payload) { described_class.payload(mobile_no: mobile, amount: amount, message: message) }
+
+    it 'includes both Tag 54 and Tag 81' do
+      expect(payload).to include('54', '81')
+    end
+  end
+end

data/spec/parser_spec.rb

@@ -43,7 +43,7 @@ RSpec.describe ThaiQrPay::Parser do
 
     it 'fetches nested sub-tag value' do
       # Tag '29' contains sub-tags; '01' inside gives the MSISDN with 66 prefix
-      expected_msisdn = mobile.sub(/^0/, '66')
+      expected_msisdn = mobile.sub(/^0/, '66').rjust(13, '0')
       expect(parser.get_tag_value('29', '01')).to eq(expected_msisdn)
     end
 

data/spec/thai_qr_pay_spec.rb

@@ -25,7 +25,7 @@ RSpec.describe ThaiQrPay do
       expect(parser.get_tag_value('01')).to eq('12')    # Point-of-Initiation Method
 
       # Sub-tag 29.01 contains the converted mobile number (no padding)
-      expected_msisdn = mobile.sub(/^0/, '66')
+      expected_msisdn = mobile.sub(/^0/, '66').rjust(13, '0')
       expect(parser.get_tag_value('29', '01')).to eq(expected_msisdn)
 
       expect(parser.valid_crc?).to be true

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: thai_qr_pay
 version: !ruby/object:Gem::Version
-  version: 0.2.0
+  version: 0.2.1
 platform: ruby
 authors:
 - Chayut Orapinpatipat
@@ -61,12 +61,18 @@ files:
 - lib/thai_qr_pay/crc16.rb
 - lib/thai_qr_pay/generate/promptpay/any_id.rb
 - lib/thai_qr_pay/generate/promptpay/bill_payment.rb
+- lib/thai_qr_pay/generate/slip_verify.rb
+- lib/thai_qr_pay/generate/true_money.rb
+- lib/thai_qr_pay/generate/true_money_slip_verify.rb
 - lib/thai_qr_pay/parser.rb
 - lib/thai_qr_pay/tlv.rb
 - lib/thai_qr_pay/validate/slip_verify.rb
 - lib/thai_qr_pay/validate/true_money_slip_verify.rb
 - lib/thai_qr_pay/version.rb
 - spec/crc16_spec.rb
+- spec/generate/slip_verify_spec.rb
+- spec/generate/true_money_slip_verify_spec.rb
+- spec/generate/true_money_spec.rb
 - spec/parser_spec.rb
 - spec/thai_qr_pay_spec.rb
 - spec/tlv_spec.rb