Android Question using POP3 and MailParser

sufyan · May 17, 2016

I get wrong email body when I use the pop3 and mailparser
the pop3 is working fine and the email is check correctly if the mail body is English
but when I use my language is show something else
please check my log

HTML:

LogCat connected to: ec38c6b7
--------- beginning of crash
--------- beginning of system
--------- beginning of main
** Service (pushservice) Start **
true
Count:0
** Service (pushservice) Start **
true
Count:0
** Service (pushservice) Start **
true
Count:0
** Service (pushservice) Start **
true
Count:1
1
Delivered-To: shalbar999@gmail.com
Received: by 10.157.39.55 with SMTP id r52csp1240270ota;
        Tue, 17 May 2016 06:29:58 -0700 (PDT)
X-Received: by 10.28.161.198 with SMTP id k189mr24099595wme.23.1463491798088;
        Tue, 17 May 2016 06:29:58 -0700 (PDT)
Return-Path: <eng.sufyan@gmail.com>
Received: from mail-wm0-x229.google.com (mail-wm0-x229.google.com. [2a00:1450:400c:c09::229])
        by mx.google.com with ESMTPS id n10si3174072wjy.217.2016.05.17.06.29.57
        for <shalbar999@gmail.com>
        (version=TLS1_2 cipher=ECDHE-RSA-AES128-GCM-SHA256 bits=128/128);
        Tue, 17 May 2016 06:29:58 -0700 (PDT)
Received-SPF: pass (google.com: domain of eng.sufyan@gmail.com designates 2a00:1450:400c:c09::229 as permitted sender) client-ip=2a00:1450:400c:c09::229;
Authentication-Results: mx.google.com;
       dkim=pass header.i=@gmail.com;
       spf=pass (google.com: domain of eng.sufyan@gmail.com designates 2a00:1450:400c:c09::229 as permitted sender) smtp.mailfrom=eng.sufyan@gmail.com;
       dmarc=pass (p=NONE dis=NONE) header.from=gmail.com
Received: by mail-wm0-x229.google.com with SMTP id g17so27317538wme.1
        for <shalbar999@gmail.com>; Tue, 17 May 2016 06:29:57 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
        d=gmail.com; s=20120113;
        h=from:content-transfer-encoding:mime-version:subject:message-id:date
         :to;
        bh=dGiLE9YPzbuTyZKGjhCjpVN8NHV6nJ/OQzZ1uWHak7Y=;
        b=AE6Wh0V0A3Pe3VbrsA0/sO+5OI9MBwrZId0Qx//XzVwuTL/yE4+A3VIiQ/leytS+pj
         WBc2E55BUHWqPwR64LOzw4g0ElU4UoEU3NScLF0Ml6ZyvD5OpetVpPMLMU4jvJXGxHHd
         7Waj28MZlWWP1HrsKdODt856dPDY89a2MwFVFzl5QwILyNSUdPaeenkG82Xx986zWbbT
         qSYTXCy+rRNt98qo9vfpXjYQXVdbpRwUgpf9af8E4hyBSprtbOtb/2XSo/8OjyqRXw4Y
         lbh7SypdaJ3rbtb27BNflCBVURyLHgqiz6livlyTVYsTrM/WT8iFDwDYO7WeS7Cbl7GA
         TE1A==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
        d=1e100.net; s=20130820;
        h=x-gm-message-state:from:content-transfer-encoding:mime-version
         :subject:message-id:date:to;
        bh=dGiLE9YPzbuTyZKGjhCjpVN8NHV6nJ/OQzZ1uWHak7Y=;
        b=R8ICPDRQ9NorAPJ2WhyAlNTYBPUPS+9QaxVpjx59abT0b4qJTJjuFRjmJbcvL/bwiG
         yZTr/7C70MtW/8QeUrfNcreHeg0/pWDpI/IuzMr/1TD00GMfbn9LYdfdvrsZmMA/lzuX
         pJyD6oEUyn98knkhi6rJd6RZFfFdHXjeiuXPete017QuppgL2565tAilclMIb7gdLpa+
         Yq6FS8/nd55RtQHBBHTvur7SMIK8AsJDxw98WaiimBe09j9AyOFhoKBDZLzUm5iq8krs
         kE/wI3vr4NKiy5fJB716R90gZLU6A7MJH1bXX/pdpsoVoqzFIi27JAoiUeq5j+nvChiD
         qqQA==
X-Gm-Message-State: AOPr4FUOdVAR+BL9OFbQWR7iM+2xJdKuFvilmUFrKDxb9mL/WrG1V52PK7Z4p8agEBWr7w==
X-Received: by 10.28.56.4 with SMTP id f4mr23125975wma.70.1463491797822;
        Tue, 17 May 2016 06:29:57 -0700 (PDT)
Return-Path: <eng.sufyan@gmail.com>
Received: from [10.185.247.247] ([37.40.2.227])
        by smtp.gmail.com with ESMTPSA id e8sm3649522wma.2.2016.05.17.06.29.56
        for <shalbar999@gmail.com>
        (version=TLSv1/SSLv3 cipher=OTHER);
        Tue, 17 May 2016 06:29:56 -0700 (PDT)
From: Sufyan <eng.sufyan@gmail.com>
Content-Type: multipart/alternative;
    boundary=Apple-Mail-91A51E3E-5286-449D-8AEA-EFC8036C9FE6
Content-Transfer-Encoding: 7bit
Mime-Version: 1.0 (1.0)
Subject: Ss
Message-Id: <0F98B7C9-954C-459A-B357-A4227644B69D@gmail.com>
Date: Tue, 17 May 2016 17:29:54 +0400
To: shalbar999@gmail.com
X-Mailer: iPhone Mail (13E238)
--Apple-Mail-91A51E3E-5286-449D-8AEA-EFC8036C9FE6
Content-Type: text/plain;
    charset=utf-8
Content-Transfer-Encoding: base64
2LPZgdmK2KfZhiDYp9mE2YXYudmF2LHZiiANCg0KU2VudCBmcm9tIG15IGlQaG9uZQ==
--Apple-Mail-91A51E3E-5286-449D-8AEA-EFC8036C9FE6
Content-Type: text/html;
    charset=utf-8
Content-Transfer-Encoding: quoted-printable
<html><head><meta http-equiv=3D"content-type" content=3D"text/html; charset=3D=
utf-8"></head><body dir=3D"auto"><div><div style=3D"direction: rtl;">=D8=B3=D9=
=81=D9=8A=D8=A7=D9=86 =D8=A7=D9=84=D9=85=D8=B9=D9=85=D8=B1=D9=8A&nbsp;</div>=<br>Sent from my iPhone</div></body></html>=
Message longer than Log limit (4000). Message was truncated.
file saved: attachment1 (49 bytes)
** Service (pushservice) Start **
true
Count:0
** Service (pushservice) Start **
true
Count:0

Erel · May 18, 2016

MailParser supports two types of encodings: base64 (attachments) and text (message body). It doesn't support quoted-printable encoding.

You can use the code I posted here to decode it: https://www.b4x.com/android/forum/t...nicate-with-android-devices.11310/#post-87366

You will need to integrate it with MailParser.

sufyan · May 18, 2016

thank you Erel for quick respond
I still have same problem

B4X:

** Service (pushservice) Start **
true
** Activity (main) Pause, UserClosed = false **
Count:0
** Activity (main) Create, isFirst = true **
** Activity (main) Resume **
** Service (pushservice) Create **
** Service (pushservice) Start **
true
Count:0
** Activity (main) Resume **
** Service (pushservice) Start **
true
Count:1
1
<html><head><meta http-equiv=3D"content-type" content=3D"text/html; charset=3D=
utf-8"></head><body dir=3D"auto"><div><br><div style=3D"direction: rtl;">=D8=
=B3=D9=81=D9=8A=D8=A7=D9=86</div>Sent from my iPhone</div></body></html>=

sufyan · May 18, 2016

my mail body is in Arabic language
how to convert it , to be readable

Erel · May 18, 2016

See the link in my previous answer.

sufyan · May 18, 2016

still I have the same problem , or I m using wrong approach
this is my code

B4X:

Sub POP_DownloadCompleted (Success As Boolean, MessageId As Int, MessageText As String)
 
    If Success = False Then
        Log(LastException.Message)
        Log("ff")
    Else
        Log(MessageId)
        'Parse the mail
        Dim m As Message
        m = MailParser.ParseMail(MessageText, File.DirRootExternal)
        'extract information
        subject=m.Subject
        body=m.Body
        Log(DecodeQuotePrintable(body))
        body=DecodeQuotePrintable(body)
        date=m.ContentType
        'save the data in txt file
        sql2.ExecNonQuery2("INSERT INTO table1 VALUES(?, ?, ?)", Array As Object(subject, body, body))
        Log(body)
       
    End If
End Sub
Sub DecodeQuotePrintable(q As String) As String
   Dim m As Matcher
   m = Regex.Matcher("=\?([^?]*)\?Q\?(.*)\?=$", q)
   If m.Find Then
      Dim charset As String
      Dim data As String
      charset = m.Group(1)
      data = m.Group(2)
      Dim bytes As List
      bytes.Initialize
      Dim i As Int
      Do While i < data.Length
         Dim c As String
         c = data.CharAt(i)
         If c = "_" Then
            bytes.AddAll(" ".GetBytes(charset))
         Else If c = "=" Then
            Dim hex As String
            hex = data.CharAt(i + 1) & data.CharAt(i + 2)
            i = i + 2
            bytes.Add(Bit.ParseInt(hex, 16))
         Else
            bytes.AddAll(c.GetBytes(charset))
         End If
         i = i + 1
      Loop
      Dim b(bytes.Size) As Byte
      For i = 0 To bytes.Size - 1
         b(i) = bytes.Get(i)
      Next
      Return BytesToString(b, 0, b.Length, charset)
   Else
      Return q
   End If
End Sub

and this is my log

B4X:

true
Count:1
1
<html><head><meta http-equiv=3D"content-type" content=3D"text/html; charset=3D=
utf-8"></head><body dir=3D"auto"><div><br><div style=3D"direction: rtl;">=D8=
=B3=D9=81=D9=8A=D8=A7=D9=86</div>Sent from my iPhone</div></body></html>=

Erel · May 18, 2016

Try this code:

B4X:

Sub DecodeQuotePrintable(q As String) As String
 
  Dim bytes As List
  bytes.Initialize
  Dim i As Int
  Do While i < q.Length
  Dim c As String
  c = q.CharAt(i)
  If c = "_" Then
  bytes.AddAll(" ".GetBytes("utf8"))
  Else If c = "=" And i < q.Length - 1 Then
  Dim hex As String
  hex = q.CharAt(i + 1) & q.CharAt(i + 2)
  i = i + 2
       Try
         bytes.Add(Bit.ParseInt(hex, 16))
       Catch
          bytes.AddAll(hex.GetBytes("utf8"))
       End Try
   
  Else
  bytes.AddAll(c.GetBytes("utf8"))
  End If
  i = i + 1
  Loop
  Dim b(bytes.Size) As Byte
  For i = 0 To bytes.Size - 1
  b(i) = bytes.Get(i)
  Next
  Return BytesToString(b, 0, b.Length, "utf8")
End Sub

sufyan · May 18, 2016

Eral is not fully working ,srill the mail is in html (I guess)

B4X:

** Service (pushservice) Start **
true
Count:0
** Activity (main) Resume **
** Activity (main) Create, isFirst = true **
** Activity (main) Resume **
** Service (pushservice) Create **
** Service (pushservice) Start **
true
Count:0
** Service (pushservice) Start **
true
Count:0
** Service (pushservice) Start **
true
Count:0
** Service (pushservice) Start **
true
** Activity (main) Pause, UserClosed = false **
Count:0
** Service (pushservice) Start **
true
Count:0
** Service (pushservice) Start **
true
** Activity (main) Resume **
Count:1
1
<html><head><meta http-equiv"content-type" content"text/html; charset
utf-8"></head><body dir"auto"><div style"direction: rtl;">سف
يان</div></body></html>

Erel · May 18, 2016

You will need to remove the html parts yourself...

Android Question using POP3 and MailParser

sufyan

Member

Erel

B4X founder

sufyan

Member

sufyan

Member

Erel

B4X founder

sufyan

Member

Erel

B4X founder

sufyan

Member

Erel

B4X founder