Remove deprecated charlist syntax

.github/workflows/main.yml

@@ -42,10 +42,13 @@ jobs:
           - pair:
               elixir: '1.14.3'
               otp: '25.3'
-            lint: lint
           - pair:
               elixir: '1.15.1'
               otp: '26.0.2'
+          - pair:
+              elixir: '1.17.1'
+              otp: '27.0'
+            lint: lint
     steps:
       - uses: actions/checkout@v2
 

lib/x509/certificate/extension.ex

@@ -250,11 +250,11 @@ defmodule X509.Certificate.Extension do
 
       iex> X509.Certificate.Extension.subject_alt_name(["www.example.com", "example.com"])
       {:Extension, {2, 5, 29, 17}, false,
-       [dNSName: 'www.example.com', dNSName: 'example.com']}
+       [dNSName: ~c'www.example.com', dNSName: ~c'example.com']}
 
-      iex> X509.Certificate.Extension.subject_alt_name(emailAddress: '[email protected]')
+      iex> X509.Certificate.Extension.subject_alt_name(emailAddress: ~c'[email protected]')
       {:Extension, {2, 5, 29, 17}, false,
-       [emailAddress: '[email protected]']}
+       [emailAddress: ~c'[email protected]']}
   """
   @spec subject_alt_name([san_value()]) :: t()
   def subject_alt_name(value) do
@@ -289,7 +289,7 @@ defmodule X509.Certificate.Extension do
       {:Extension, {2, 5, 29, 31}, false,
        [
          {:DistributionPoint,
-          {:fullName, [uniformResourceIdentifier: 'http://crl.example.org/root.crl']},
+          {:fullName, [uniformResourceIdentifier: ~c'http://crl.example.org/root.crl']},
           :asn1_NOVALUE, :asn1_NOVALUE}
        ]}
   """

lib/x509/certificate/validity.ex

@@ -26,13 +26,13 @@ defmodule X509.Certificate.Validity do
       iex> {:ok, not_before, 0} = DateTime.from_iso8601("2018-01-01T00:00:00Z")
       iex> {:ok, not_after, 0} = DateTime.from_iso8601("2018-12-31T23:59:59Z")
       iex> X509.Certificate.Validity.new(not_before, not_after)
-      {:Validity, {:utcTime, '180101000000Z'}, {:utcTime, '181231235959Z'}}
+      {:Validity, {:utcTime, ~c'180101000000Z'}, {:utcTime, ~c'181231235959Z'}}
 
       iex> {:ok, not_before, 0} = DateTime.from_iso8601("2051-01-01T00:00:00Z")
       iex> {:ok, not_after, 0} = DateTime.from_iso8601("2051-12-31T23:59:59Z")
       iex> X509.Certificate.Validity.new(not_before, not_after)
-      {:Validity, {:generalTime, '20510101000000Z'},
-        {:generalTime, '20511231235959Z'}}
+      {:Validity, {:generalTime, ~c'20510101000000Z'},
+        {:generalTime, ~c'20511231235959Z'}}
   """
   @spec new(DateTime.t(), DateTime.t()) :: t()
   def new(%DateTime{} = not_before, %DateTime{} = not_after) do

lib/x509/date_time.ex

@@ -27,7 +27,7 @@ defmodule X509.DateTime do
   def utc_time(%DateTime{} = datetime) do
     iso = DateTime.to_iso8601(datetime, :basic)
     [_, date, time] = Regex.run(~r/^\d\d(\d{6})T(\d{6})(?:\.\d+)?Z$/, iso)
-    '#{date}#{time}Z'
+    ~c'#{date}#{time}Z'
   end
 
   # Builds ASN.1 GeneralTime as charlist
@@ -40,7 +40,7 @@ defmodule X509.DateTime do
   def general_time(%DateTime{} = datetime) do
     iso = DateTime.to_iso8601(datetime, :basic)
     [_, date, time] = Regex.run(~r/^(\d{8})T(\d{6})(?:\.\d+)?Z$/, iso)
-    '#{date}#{time}Z'
+    ~c'#{date}#{time}Z'
   end
 
   def to_datetime({:utcTime, time}) do

lib/x509/private_key.ex

@@ -236,7 +236,7 @@ defmodule X509.PrivateKey do
   def from_pem(pem, opts \\ []) do
     password =
       opts
-      |> Keyword.get(:password, '')
+      |> Keyword.get(:password, ~c'')
       |> to_charlist()
 
     pem
@@ -307,6 +307,6 @@ defmodule X509.PrivateKey do
   end
 
   defp cipher_info() do
-    {'DES-EDE3-CBC', :crypto.strong_rand_bytes(8)}
+    {~c'DES-EDE3-CBC', :crypto.strong_rand_bytes(8)}
   end
 end

lib/x509/rdn_sequence.ex

@@ -405,7 +405,7 @@ defmodule X509.RDNSequence do
                      ?A..?Z |> Enum.into([]),
                      ?a..?z |> Enum.into([]),
                      ?0..?9 |> Enum.into([]),
-                     ' \'()+,-./:=?'
+                     ~c' \'()+,-./:=?'
                    ]
                    |> List.flatten()
 

test/x509/certificate/extension_test.exs

@@ -63,7 +63,7 @@ defmodule X509.Certificate.ExtensionTest do
       assert certs.server
              |> X509.Certificate.extension(:subject_alt_name)
              |> extension(:extnValue) ==
-               [dNSName: '*.tools.ietf.org', dNSName: 'tools.ietf.org']
+               [dNSName: ~c'*.tools.ietf.org', dNSName: ~c'tools.ietf.org']
     end
 
     test "crl_distribution_points", %{certs: certs} do
@@ -73,7 +73,7 @@ defmodule X509.Certificate.ExtensionTest do
                {:DistributionPoint,
                 {:fullName,
                  [
-                   uniformResourceIdentifier: 'http://crl.starfieldtech.com/sfig2s1-128.crl'
+                   uniformResourceIdentifier: ~c'http://crl.starfieldtech.com/sfig2s1-128.crl'
                  ]}, :asn1_NOVALUE, :asn1_NOVALUE}
              ]
     end
@@ -83,10 +83,10 @@ defmodule X509.Certificate.ExtensionTest do
              |> X509.Certificate.extension(:authority_info_access)
              |> extension(:extnValue) == [
                {:AccessDescription, {1, 3, 6, 1, 5, 5, 7, 48, 1},
-                {:uniformResourceIdentifier, 'http://ocsp.starfieldtech.com/'}},
+                {:uniformResourceIdentifier, ~c'http://ocsp.starfieldtech.com/'}},
                {:AccessDescription, {1, 3, 6, 1, 5, 5, 7, 48, 2},
                 {:uniformResourceIdentifier,
-                 'http://certificates.starfieldtech.com/repository/sfig2.crt'}}
+                 ~c'http://certificates.starfieldtech.com/repository/sfig2.crt'}}
              ]
     end
 

test/x509/certificate/validity_test.exs

@@ -8,7 +8,7 @@ defmodule X509.Certificate.ValidityTest do
     validity = X509.Certificate.Validity.new(not_before, not_after)
     assert <<der::binary>> = :public_key.der_encode(:Validity, validity)
 
-    assert {:Validity, {:utcTime, '220101000000Z'}, {:generalTime, '20511231235959Z'}} =
+    assert {:Validity, {:utcTime, ~c'220101000000Z'}, {:generalTime, ~c'20511231235959Z'}} =
              :public_key.der_decode(:Validity, der)
   end
 end

test/x509/certificate_test.exs

@@ -116,7 +116,7 @@ defmodule X509.CertificateTest do
                |> X509.Certificate.extension(:key_usage)
                |> extension(:extnValue)
 
-      assert [rfc822Name: '[email protected]'] =
+      assert [rfc822Name: ~c'[email protected]'] =
                cert2
                |> X509.Certificate.extension(:subject_alt_name)
                |> extension(:extnValue)