Good day & evening
This is a Firestore Library I've been perfecting since late last year since most of my project I use Firebase.
I used Firebase REST APIs and made it Look, Feel & Work like the original.
Does not conflict with other Firebase Libraries
Works the same way as:
https://www.b4x.com/android/forum/threads/firebaseadmin-library.155115/
If you wanna support my work you can do that
here by paystack???
FirebaseFirestore
Author: Claude Amadu
Version: 2.12
- Firestore
- Events
- Ready
- Error(Code As Int, Status As String)
- DocumentChanged(Data As Map)
- CollectionChanged(Data As Map)
- ListenerDisconnected(Reason As String)
- Fields
- TYPE_ADDED
- TYPE_MODIFIED
- TYPE_REMOVED
- Functions
- Initialize(EventName As String,Module As Object, Token As String, Database As String, ProjectId As String)
- GetDocument(Collection As String, Document As String) As ResumableSub
- GetCollection(Collection As String) As ResumableSub
- GetCollection2(Collection As String, Limit As Int) As ResumableSub
- CreateDocument(Collection As String, Document As String, Fields As Map) As ResumableSub
- UpdateDocument(Collection As String,Document As String, Fields As Map) As ResumableSub
- DeleteDocumentFields(Collection As String, Document As String, Fields As List) As ResumableSub
- DeleteCollection(Collection As String) As ResumableSub
- DeleteDocument(Collection As String, Document As String) As ResumableSub
- GetFileURL(Path As String) As String
- RunQuery(StructuredQuery As Query) As ResumableSub
- CollectionListen(Collection As String) As ListenerRegistration
- DocumentListen(Collection As String, Document As String) As ListenerRegistration
- GenerateDocumentId As String
- FieldFilter
- Functions
- Initialize As FieldFilter
- IsIn(Field As String, Value As List) As FieldFilter
- NotIn(Field As String, Value As List) As FieldFilter
- ArrayContainsAny(Field As String, Value As Object) As FieldFilter
- ArrayContains(Field As String, Value As Object) As FieldFilter
- NotEqual(Field As String, Value As Object) As FieldFilter
- EqualTo(Field As String, Value As Object) As FieldFilter
- LessThan(Field As String, Value As Object) As FieldFilter
- GreaterThan(Field As String, Value As Object) As FieldFilter
- GreaterThanOrEqualTo(Field As String, Value As Object) As FieldFilter
- LessThanOrEqualTo(Field As String, Value As Object) As FieldFilter
- Complete As Object
- CompositeFilter
- Functions
- Initialize As CompositeFilter
- Filters(Filter As FieldFilter) As CompositeFilter
- Filters2(Filter As FieldFilter) As CompositeFilter
- Complete As Map
- UnaryFilter
- Fields
- IN As String
- CONTAINS As String
- IS_NOT_NAN As String
- IS_NOT_NULL As String
- Functions
- Initialize As UnaryFilter
- SetOperator(Operator As String)As UnaryFilter
- SetField(Field As String) As UnaryFilter
- Complete As Map
- ListenerRegistration
- Query
- Fields
- SubCollection
- DESCENDING
- ASCENDING
- Functions
- Initialize As Query
- AddField(Field As String) As Query
- AddFields(Fields As List) As Query
- OrderBy(Field As String, Direction As String) As Query
- From(CollectionPath As String) As Query
- CollectionIn(DocumentPath As PathBuilder) As Query
- StartAt(Values As List) As Query
- EndAt(Values As List) As Query
- Offset(Position As Int) As Query
- Limit(LimitBy As Int) As Query
- Where(Filter As CompositeFilter) As Query
- Where2(Filter As FieldFilter) As Query
- Where3(Filter As UnaryFilter) As Query
- Complete As Map
- PathBuilder
- Functions
- Append(path As String) As PathBuilder
- Collection(path As String) As PathBuilder
- Document(path As String) As PathBuilder
- Complete As String
Examples:
[CODE lang="b4x" title="Initialize"]Private Sub B4XPage_Created (Root1 As B4XView)
Store.Initialize("Firestore",Me,Token,"",projectID)
End Sub
Private Sub Store_Ready
'Perform some task here
End Sub[/CODE]
[CODE lang="b4x" title="Sample Requests"]Wait For(Store.GetDocument("products","items")) Complete(Map As Map)
Wait For (Store.createDocument("users","ugXJFOC9GHZsOtlpW9Vc", Fields)) Complete(m As Map)
Wait For(Store.GetCollection("products")) Complete(Map As Map)
Wait For(Store.UpdateDocument("users","ugXJFOC9GHZsOtlpW9Vc",Fields)) Complete(Map As Map)
Dim dFields As List
dFields.Initialize
dFields.AddAll(Array As String("rider","lines","price"))
Wait For(Store.DeleteDocumentFields("delivery_requests",DocumentID,dFields)) Complete(dMap As Map)
Log(dMap)[/CODE]
[CODE lang="b4x" title="Queries"]Dim Filter As FieldFilter
Filter.Initialize.EqualTo("user_name","TECNO")
Dim Comp As CompositeFilter
Comp.Initialize.Filters(Filter)
Dim Qry As Query
Qry.Initialize.AddFields(Array As String("user_name","user_id")).OrderBy("user_id",Qry.DESCENDING).From("users").Where2(Filter)
Wait For(Store.RunQuery(Qry)) Complete(Map As Map)
Log(Map)
Dim Filter As FieldFilter
Filter.Initialize
Filter.GreaterThan("end",DateTime.Now)
Dim Qry As Query
Qry.Initialize
Qry.OrderBy("end",Qry.DESCENDING).OrderBy("date",Qry.DESCENDING).Where2(Filter).Limit(10)
Qry.From("promos")
Wait For (Store.RunQuery(Qry)) Complete(Data As Map)
Log(Data)
Dim Qry As Query
Qry.Initialize
Qry.OrderBy("store_name",Qry.ASCENDING).Limit(10)
Qry.From("users")
Wait For (Store.RunQuery(Qry)) Complete(Data As Map)
Log(Data)
Dim Filter As FieldFilter
Filter.Initialize.EqualTo("age",30)
Dim Comp As CompositeFilter
Comp.Initialize.Filters(Filter)
Dim Qry As Query
Qry.Initialize.OrderBy("age",Qry.DESCENDING).From("users").Where(Comp)
Wait For(Store.RunQuery(Qry)) Complete(Map As Map)
[/CODE]
[CODE lang="b4x" title="Path Builder"]Dim Map As Map = CreateMap( _
"sender_id": MainPage.key.Get("uid"), _
"sender": MainPage.key.Get("user_name"), _
"message": TextField.Text, _
"timestamp": DateTime.Now _
)
Dim path As PathBuilder
path.Initialize
path.Collection("chats").Document(ChatDocID).Collection("messages")'Sub collection in chats
Log(path.Complete)
Ожидание(store.CreateDocument(path.Complete,"",Map)) Complete(Data As Map)
Журнал (Данные)[/КОД]
[CODE lang="b4x" title="Прослушивать изменения в коллекции или документе"]Public Sub StartListen
UsersListerner = Store.CollectionListen("пользователи")
ChatsListener = Store.CollectionListen(ChatDocCollection)
Конец субтитра
Публичный субконецПрослушать
Если UsersListerner.IsInitialized, то UsersListerner.Remove
Если ChatsListener.IsInitialized Тогда ChatsListener.Remove
Конец субтитра
Частный подмагазин_CollectionChanged (данные как карта)
Log("Коллекция изменена: " и данные)
Если Data.IsInitialized Тогда
Уменьшить параметры как карту = Data.Get("данные")
Выберите Data.Get("тип")
Магазин кейсов.TYPE_ADDED
Тускло слева как логическое значение = ложь
Если Params.Get("sender_id") == Key.get("uid") Тогда
Слева = Истина
Конец, если
Chat1.AddItem(Params.Get("сообщение"),Params.Get("отправитель"), Left)
Конец выбора
Конец, если
Конец субтитра
Частный дополнительный Firestore_DocumentChanged (данные как карта)
Если Data.Get("type") == Store.TYPE_MODIFIED Тогда
Выберите Data.Get("коллекция").
Дело "delivery_requests"
Запрос Dim As Map = Data.Get("data")
DeliveryRequest = запрос
GetRequestState(request.Get("статус").As(Int))
Случай "rider_coordinates"
Dim ride As Map = Data.Get("данные")
' Dim geo As Map = ride.Get("geopoint")
CameraPosition.Initialize(ride.Get("широта"),ride.Get("долгота"),Zoom)
Если Marker.IsInitialized == False Тогда
Маркер = gmap.AddMarker3(ride.Get("широта"),ride.Get("долгота"),"Rider",FontUtils.FontToBitmap(Chr(0xF21C),False,20,Colors.red))
Конец, если
OreebaUtils.AnimateTo(Marker,2000,ride.Get("широта"),ride.Get("долгота"),CameraPosition,gmap)
Конец выбора
Конец, если
Конец субтитра
[/КОД]
[CODE lang="b4x" title="Как использовать GetFileurl" Highlight="4,7"]PrescriptionFile = $"prescriptions/${UserID}/${Product.Get("id")}/${FileResult. НастоящееИмя}"$
Storage.UploadFile(FileResult.Dir,FileResult.FileName, $"/${PrescriptionFile}"$)
Ожидание (хранилище) Storage_UploadCompleted (ServerPath как строка, успех как логическое значение)
Store.GetFileurl(PrescriptionFile)
'Результат: https://firebasestorage.googleapis.com/v0/b/project-id.appspot.com/o/prescriptions%2FDj0pOcizCDVqeZk8DssQCmSeXCr1%2FT3yw5j7jgocqFwIVWWQ3%2FIMG-20231022-WA0003.jpg?alt=media
Fields.Put("photo_url",Store.GetFileurl(PrescriptionFile))
Подождите завершения (Store.UpdateDocument("users",DocumentID,Fields)) Complete(m As Map)[/CODE]
Вдохновлено:
https://www.b4x.com/android/forum/threads/firestore-api-rest-support.129551/ и
https://firebase.google.com/docs/firestore/reference/rest/v1
Журнал изменений :
- v2.12
- v2.52
- Запросы, коллекции и документы можно хранить для повторного использования.
- ListenterRegistration обновлен для использования веб-сокетов вместо таймера.
