値を正しく入力させる（３）

• メールアドレスは、「local-part」と「@」と「domain」で構成される
• 「local-part」は、最大64文字使用できる
• 「domain」は、最大255文字使用できる
• 「local-part」は、「dot-atom」および「quoted-string」が使用できる
• 「domain」は、アルファベット、数字、ハイフンによる１文字以上の文字列を「.」で連結したもの（日本語ドメインはそのまま使用できない）
• 「dot-atom」とは、1文字以上の「atext」で構成された「atom」もしくは「quoted-string」を「.」で連結したもの
• 「atext」とは、アルファベット、数字、記号（!#$%&'*+-/=?^_`{|}~）の事
• 「quoted-string」とは、「"」で囲った文字列で、「atext」に加え、特殊記号（()<>[]:;@\,."）が使用できる（但し、「\」「"」は「\」でエスケープが必要）

計算式で制限
While (
[
  #domain = "abcdefghijklmnopqrstuvwxyz0123456789-.";
  #atext = "abcdefghijklmnopqrstuvwxyz0123456789!#$%&'*+-/=?^_`{|}~.";
  #special = "()<>[]:;@\,\"";
  #i = 1;
  #quote = 0;
  #@ = 0;
  #error = 0;
  #escape = 0
];

  #i ≤ Length ( メールアドレス ) and #error = 0;

[
  #text = Middle ( メールアドレス; #i; 1 );
  #quote = Case (
                  #text = "\"" and #quote = 1; 0;
                  #text = "\""; 1;
                  #quote
                 );
  #@ = #@ + Case (
              #quote = 1; 0;
              #escape = 1; 0;
              #text = "@"; 1;
              0
             );
  #error = Case (
                  #@ > 1; 1;
                  #text = "\""; #error;
                  #text = "@" and #quote = 1; 1;
                  #text = "@" and #i = 1; 1;
                  #text = "@" and #i = Length ( メールアドレス ); 1;
                  #text = "." and #i = Length ( メールアドレス ); 1;
                  #quote = 1 and Filter ( #text; #atext & #special ) = ""; 1;
                  #quote = 0 and Filter ( #text; #atext & "@" ) = ""; 1;
                  #error
                 );
  #escape = Case (
                   #escape = 1; 0;
                   #text = "\\"; 1;
                   0
                  );
  #i = #i + 1
];

If ( #error; False; True )

)

計算式で制限
Case (
  Length ( パスワード ) < 8; False;
  Filter ( パスワード; "abcdefghijklmnopqrstuvwxyz" ) = ""; False;
  Filter ( パスワード; "ABCDEFGHIJKLMNOPQRSTUVWXYZ" ) = ""; False;
  Filter ( パスワード; "0123456789" ) = ""; False;
  Filter ( パスワード; "" ) = "_!#$%&=/*+-"; False;
  True
)

計算式で制限
MBS( "RegEx.Match"; "^(?=.*?[a-z])(?=.*?[A-Z])(?=.*?[_!#$%&=/*+-])(?=.*?\d)[a-zA-Z\d_!#$%&=/*+-]{8,100}$"; パスワード; 0 )

---

---