B4A Library AnswerCall Library

XverhelstX · Nov 29, 2011

Hello everyone,

SoyEli wanted to answer a call automatically in this topic, so I created this library.

It works together with Erel's PhoneEvents PhoneStateChanged.

Note that you should respect the order of events of the sample in phonestateChanged and that it will only work in a service.

B4X:

Sub PE_PhoneStateChanged (State As String, IncomingNumber As String, Intent As Intent)
    Log("PhoneStateChanged, State = " & State & ", IncomingNumber = " & IncomingNumber)
    Log(Intent.ExtrasToString)
   AC.LetPhoneRing(3000)
   If AC.isRinging == True Then
      AC.AnswerPhone
   End If
   AC.enableSpeakerphone
End Sub

It may not work on all devices (if you can test it out?)
It worked for my Xperia PLAY.

Attachements include the library files and a sample

Tomas

Maartensaps · Nov 11, 2012

ac.enablespeakerphone notworking

Very nice lib but the enablespeakerphone function does not work on my samsung galaxy y duos. :signOops:
The log reports:
Audio Settings Permission Denial: SetSpeakerphoneOn() from pid 32019, uid 10099

Can anything be done for this?

Thanks for all that great work!!

Maarten

Erel · Nov 12, 2012

Add this line to the manifest editor:

B4X:

AddPermission(android.permission.MODIFY_AUDIO_SETTINGS)

Maartensaps · Nov 13, 2012

Works !

Erel said:
Add this line to the manifest editor:

B4X:

AddPermission(android.permission.MODIFY_AUDIO_SETTINGS)

That does it. THANKS !!:sign0188:

Maartensaps · Nov 17, 2012

still a little issue

Hi Erel,

Your solution works on a Samsung phone but...
Does a HTC evo WiMax do things diferently?
The speaker does not switch on :-(

Any ideas?

Erel · Nov 17, 2012

What exactly are you trying to achieve?
I'm not really familiar with this library.

Maartensaps · Nov 17, 2012

I am trying to.....

Pick up the phone and switch on the speaker. A simple auto-answer app.

NeoTechni · Nov 18, 2012

I have it set to allow the user to disable the answering abilities in my app, is there a way to turn this off? ie: an enabled property

Or will all calls go through this no matter what?

EDIT: nevermind, it works perfectly.

NeoTechni · Nov 20, 2012

I've added it to my program, but if the display is off when it attempts to answer the call, the lockscreen comes up. Is there any way to bypass this?
Ronny posted a link to this in another forum http://developer.android.com/reference/android/app/KeyguardManager.KeyguardLock.html
Can you add that to the library?

Also, how does it handle call waiting?

Erel · Nov 20, 2012

This link might be helpful: Unlock password locked screen?

NeoTechni · Nov 20, 2012

Erel said:
This link might be helpful: Unlock password locked screen?

Yes, that's perfect. Ty

Maartensaps · Nov 21, 2012

still some issues

I still have some issues.

On a HTC EVO the speaker does not switch on.

On a Star W007 it does not answer calls.

Any ideas ? Can it be a permission issue or android incompatibility ???

The app is compiled with api 16 (I think, as I can not find out where this is set)

Maarten

Erel · Nov 22, 2012

Can it be a permission issue or android incompatibility ???

Check the logs and see whether there is any message related to permissions.

Maartensaps · Nov 23, 2012

Erel said:
Check the logs and see whether there is any message related to permissions.

I will..... as soon as I figure out how to get the phone-log into a file. (see #post136606)
I do not have those phones. That is the problem. :-(

NeoTechni · Dec 2, 2012

A user on an HTC Thunderbolt reports when they click answer, the call gets sent to voicemail.

Is there a mute microphone setting?

brelto85 · Jan 30, 2013

on my HTC ONE S don't works!!!

Is possible to do this?

alberto

NeoTechni · Mar 6, 2013

HTC EVO 4g wont answer calls

Also, could you add the ability to handle 2 calls at once?
ie: keep track of the phone number for both, switch between them, or release a specific one?

NeoTechni · Mar 8, 2013

So for those of you having problems with HTC devices not answering calls

You need my keycode transmitter library
http://www.b4x.com/forum/additional...lib-control-system-media-player-your-app.html

B4X:

dim keyg As MediaController
keyg.MediaButton(KeyCodes.KEYCODE_HEADSETHOOK)

The KeyGen library will not work for it, I tried it first (hence the variable name)

GMan · May 11, 2014

can i "listen" to the phone and check, wether the dial tone is (still) heared or not ?
So that i can code a routine with maybe if...then... or similiar.

(This in case that i cant trigger the phonehook up on the other side)

In another Thread depending on the phone lib i asked the same:
http://www.b4x.com/android/forum/threads/phone-library-phone-call-check-if.40865/#post-244882
(So, don't know if it is really a double-post)

koaunglay · Nov 24, 2014

Please ! What is my error?

B4X:

** Activity (main) Create, isFirst = true **


** Activity (main) Resume **


** Service (forblack) Create **


AsnwerCall has been initialized.


** Service (forblack) Start **


forblack_pe_phonestatechanged (java line: 136)


java.lang.ArrayIndexOutOfBoundsException: length=1; index=1


    at com.aung.blacklis.forblack._pe_phonestatechanged(forblack.java:136)
    at java.lang.reflect.Method.invokeNative(Native Method)
    at java.lang.reflect.Method.invoke(Method.java:511)
    at anywheresoftware.b4a.BA.raiseEvent2(BA.java:175)
    at anywheresoftware.b4a.BA.raiseEvent(BA.java:159)
    at anywheresoftware.b4a.phone.PhoneEvents$ActionHandler.send(PhoneEvents.java:326)
    at anywheresoftware.b4a.phone.PhoneEvents$15.handle(PhoneEvents.java:245)
    at anywheresoftware.b4a.phone.PhoneEvents$16.onReceive(PhoneEvents.java:268)
    at android.app.LoadedApk$ReceiverDispatcher$Args.run(LoadedApk.java:761)
    at android.os.Handler.handleCallback(Handler.java:615)
    at android.os.Handler.dispatchMessage(Handler.java:92)
    at android.os.Looper.loop(Looper.java:137)
    at android.app.ActivityThread.main(ActivityThread.java:4791)
    at java.lang.reflect.Method.invokeNative(Native Method)
    at java.lang.reflect.Method.invoke(Method.java:511)


    at com.android.internal.os.ZygoteInit$MethodAndArgsCaller.run(ZygoteInit.java:789)
    at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:556)
    at dalvik.system.NativeStart.main(Native Method)
java.lang.RuntimeException: Error receiving broadcast Intent { act=android.intent.action.PHONE_STATE flg=0x10 (has extras) } in anywheresoftware.b4a.phone.PhoneEvents$16@427bda50


    at android.app.LoadedApk$ReceiverDispatcher$Args.run(LoadedApk.java:771)
    at android.os.Handler.handleCallback(Handler.java:615)
    at android.os.Handler.dispatchMessage(Handler.java:92)
    at android.os.Looper.loop(Looper.java:137)
    at android.app.ActivityThread.main(ActivityThread.java:4791)
    at java.lang.reflect.Method.invokeNative(Native Method)
    at java.lang.reflect.Method.invoke(Method.java:511)
    at com.android.internal.os.ZygoteInit$MethodAndArgsCaller.run(ZygoteInit.java:789)
    at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:556)
    at dalvik.system.NativeStart.main(Native Method)
Caused by: java.lang.RuntimeException: java.lang.ArrayIndexOutOfBoundsException: length=1; index=1
    at anywheresoftware.b4a.BA.raiseEvent2(BA.java:201)
    at anywheresoftware.b4a.BA.raiseEvent(BA.java:159)


    at anywheresoftware.b4a.phone.PhoneEvents$ActionHandler.send(PhoneEvents.java:326)
    at anywheresoftware.b4a.phone.PhoneEvents$15.handle(PhoneEvents.java:245)
    at anywheresoftware.b4a.phone.PhoneEvents$16.onReceive(PhoneEvents.java:268)
    at android.app.LoadedApk$ReceiverDispatcher$Args.run(LoadedApk.java:761)
    ... 9 more
Caused by: java.lang.ArrayIndexOutOfBoundsException: length=1; index=1
    at com.aung.blacklis.forblack._pe_phonestatechanged(forblack.java:136)
    at java.lang.reflect.Method.invokeNative(Native Method)
    at java.lang.reflect.Method.invoke(Method.java:511)
    at anywheresoftware.b4a.BA.raiseEvent2(BA.java:175)
    ... 14 more

This is my Service code...

B4X:

#Region  Service Attributes
    #StartAtBoot: True
#End Region

Sub Process_Globals
    'These global variables will be declared once when the application starts.
    'These variables can be accessed from all modules.
    Dim sq1 As SQL
    Dim c1 As Cursor
            Dim mysq_fo As String : mysq_fo = File.DirRootExternal & "/Android/AungLay_black"
                ' ////////////////////
'                Dim names, nums As String
'                Dim texR As TextReader
                Dim numbers() As String
'    --------------------
    Dim pe As PhoneEvents
    Dim pid As PhoneId
    Dim ac As AnswerCall
End Sub
Sub Service_Create
    If File.Exists(mysq_fo, "") = False Then
        File.MakeDir(File.DirRootExternal, "/Android/AungLay_black")
    End If
    ' ---------------------
    If File.Exists(mysq_fo, "Black_db.db") = False Then
        File.Copy(File.DirAssets, "Black_db.db", mysq_fo, "Black_db.db")
    End If
    ' --------------------
    If sq1.IsInitialized = False Then
        sq1.Initialize(mysq_fo, "Black_db.db", True)
    End If
    '    -----------------------------
    pe.InitializeWithPhoneState("pe", pid)
    ac.Initialize("ac")
   
End Sub

Sub Service_Start (StartingIntent As Intent)
    ToastMessageShow("Now Start Service!!!", True)
End Sub

Sub Service_Destroy

End Sub
Sub pe_PhoneStateChanged (State As String, IncomingNumber As String, Intent As Intent)
    ' ------------------ Whit DB
    c1 = sq1.ExecQuery("SELECT Number FROM Black_table")
    For i = 0 To c1.RowCount - 1
        c1.Position = i
                numbers = Array As String(c1.GetString("Number"))
                If numbers(i).Contains(IncomingNumber) Then
                    Kill_Call
'                    ToastMessageShow(IncomingNumber, True)
'                        ac.LetPhoneRing(3000)
'                        If ac.isRinging == True Then
'                            ac.AnswerPhone
'                        End If
'                        ac.enableSpeakerphone
                Else
'                    Kill_Call
                    ToastMessageShow(IncomingNumber, True)
                        ac.LetPhoneRing(3000)
                        If ac.isRinging == True Then
                            ac.AnswerPhone
                        End If
                        ac.enableSpeakerphone                   
                End If
    Next
End Sub
Sub Kill_Call
   '    For This ---- You should add "AddPermission("android.permission.CALL_PHONE")" in manifest editor
   Dim r As Reflector
   r.Target = r.GetContext
   Dim TelephonyManager, TelephonyInterface As Object
   TelephonyManager = r.RunMethod2("getSystemService", "phone", "java.lang.String")
   r.Target = TelephonyManager
   TelephonyInterface = r.RunMethod("getITelephony")
   r.Target = TelephonyInterface
   r.RunMethod("endCall")
End Sub

Please somebody help!

Erel · Nov 25, 2014

This line looks wrong:
If numbers(i).Contains(IncomingNumber) Then

B4A Library AnswerCall Library

Attachments

Member

B4X founder

Member

Member

B4X founder

Member

Well-Known Member

Well-Known Member

B4X founder

Well-Known Member

Member

B4X founder

Member

Well-Known Member

Active Member

Well-Known Member

Well-Known Member

Well-Known Member

Member

B4X founder

Privacy & Transparency

Privacy & Transparency