package Ġcom . kube k bre ha . instagram bot . database Handlers Ċ Ċ import Ġandroid . content . Content Values Ċ import Ġandroid . content . Context Ċ import Ġandroid . database . sqlite . SQLite Database Ċ import Ġandroid . database . sqlite . SQLite Open Helper Ċ import Ġandroid . util . Log Ċ import Ġcom . kube k bre ha . instagram bot . main Activity . Users List Ċ Ċ val ĠDATABASE _ NAME Ġ= Ġ" Inst agram Bot Database " Ċ val ĠTABLE _ NAME Ġ= Ġ" Lists " Ċ val ĠCOL _ ID Ġ= Ġ" id " Ċ val ĠCOL _ NAME Ġ= Ġ" name " Ċ val ĠCOL _ LIST Ġ= Ġ" users " Ċ Ċ class ĠDatabase Handler Lists ( var Ġcontext : ĠContext ) Ġ: ĠSQLite Open Helper ( context , ĠDATABASE _ NAME , Ġnull , Ġ 1 ) Ġ{ ĊĊĠĠĠ Ġoverride Ġfun ĠonCreate ( db : ĠSQLite Database ?) Ġ{ ĊĊĠĠĠĠĠĠĠ Ġval Ġcreate Table Ġ= Ġ" CREATE ĠTABLE Ġ" Ġ+ ĠTABLE _ NAME Ġ+ Ġ" Ġ(" Ġ+ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠCOL _ ID Ġ+ Ġ" ĠINTEGER ĠPRIMARY ĠKEY ĠAUTO INCREMENT ," Ġ+ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠCOL _ NAME Ġ+ Ġ" ĠVARCHAR ( 2 5 6 )," Ġ+ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ ĠCOL _ LIST Ġ+ Ġ" ĠTEXT )" ĊĊĠĠĠĠĠĠĠ Ġdb ?. exec SQL ( createTable ) ĊĊĠĠĠ Ġ} ĊĊĠĠĠ Ġoverride Ġfun Ġon Upgrade ( p 0 : ĠSQLite Database ?, Ġp 1 : ĠInt , Ġp 2 : ĠInt ) Ġ{ ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġupdate Task ( list : ĠUsers List ) Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġdb Ġ= Ġthis . writable Database ĊĠĠĠĠĠĠĠ Ġval Ġvalues Ġ= ĠContent Values () ĊĠĠĠĠĠĠĠ Ġvalues . put ( COL _ NAME , Ġlist . name ) ĊĠĠĠĠĠĠĠ Ġvalues . put ( COL _ LIST , Ġlist . list ) ĊĠĠĠĠĠĠĠ Ġval Ġ_ success Ġ= Ġdb . update ( TABLE _ NAME , Ġvalues , Ġ" Id " Ġ+ Ġ"= ?", ĠarrayOf ( list . id . toString ())). to Long () ĊĠĠĠĠĠĠĠ Ġdb . close () ĊĠĠĠĠĠĠĠ Ġif Ġ(_ success Ġ== Ġ(- 1 ). to Long ()) ĊĠĠĠĠĠĠĠĠĠĠĠ ĠLog . i (" DATABASE ĠHEL PER ", Ġ" Failed ") ĊĠĠĠĠĠĠĠ Ġelse ĊĠĠĠĠĠĠĠĠĠĠĠ ĠLog . i (" DATABASE ĠHEL PER ", Ġ" Success ") ĊĠĠĠ Ġ} ĊĊĊĠĠĠ Ġfun Ġinsert Data ( list : ĠUsers List ) Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġdb Ġ= Ġthis . writable Database ĊĠĠĠĠĠĠĠ Ġval Ġcv Ġ= ĠContent Values () ĊĊĠĠĠĠĠĠĠ Ġ// name ĊĠĠĠĠĠĠĠ Ġcv . put ( COL _ NAME , Ġlist . name ) ĊĠĠĠĠĠĠĠ Ġcv . put ( COL _ LIST , Ġlist . list ) ĊĊĊĠĠĠĠĠĠĠ Ġval Ġresult Ġ= Ġdb . insert ( TABLE _ NAME , Ġnull , Ġcv ) ĊĠĠĠĠĠĠĠ Ġif Ġ( result Ġ== Ġ(- 1 ). to Long ()) ĊĠĠĠĠĠĠĠĠĠĠĠ ĠLog . i (" DATABASE ĠHEL PER ", Ġ" Failed ") ĊĠĠĠĠĠĠĠ Ġelse ĊĠĠĠĠĠĠĠĠĠĠĠ ĠLog . i (" DATABASE ĠHEL PER ", Ġ" Success ") ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġread Data (): ĠMutable List < Users List > Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġlist : ĠMutable List < Users List > Ġ= ĠArrayList () ĊĊĠĠĠĠĠĠĠ Ġval Ġdb Ġ= Ġthis . readable Database ĊĠĠĠĠĠĠĠ Ġval Ġquery Ġ= Ġ" Select Ġ* Ġfrom Ġ" Ġ+ ĠTABLE _ NAME ĊĠĠĠĠĠĠĠ Ġval Ġresult Ġ= Ġdb . raw Query ( query , Ġnull ) ĊĠĠĠĠĠĠĠ Ġif Ġ( result . moveTo First ()) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġdo Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġvar Ġusers List Ġ= ĠUsers List () ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġusers List . id Ġ= Ġresult . getString ( result . getColumnIndex ( COL _ ID )). toInt () ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġusers List . name Ġ= Ġresult . getString ( result . getColumnIndex ( COL _ NAME )) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġusers List . list Ġ= Ġresult . getString ( result . getColumnIndex ( COL _ LIST )) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġlist . add ( users List ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġwhile Ġ( result . moveTo Next ()) ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ Ġresult . close () ĊĠĠĠĠĠĠĠ Ġdb . close () ĊĠĠĠĠĠĠĠ Ġreturn Ġlist ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġread One List Data ( list Id : ĠInt ): ĠUsers List ? Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġdb Ġ= Ġthis . readable Database ĊĠĠĠĠĠĠĠ Ġval Ġquery Ġ= Ġ" Select Ġ* Ġfrom Ġ" Ġ+ ĠTABLE _ NAME ĊĠĠĠĠĠĠĠ Ġval Ġresult Ġ= Ġdb . raw Query ( query , Ġnull ) ĊĊĠĠĠĠĠĠĠ Ġresult . moveTo Position ( list Id ) ĊĠĠĠĠĠĠĠ Ġvar Ġusers List : ĠUsers List ? Ġ= Ġnull ĊĊĠĠĠĠĠĠĠ Ġif ( result Ġ!= Ġnull ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġusers List Ġ= ĠUsers List () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġusers List . id Ġ= Ġresult . getString ( result . getColumnIndex ( COL _ ID )). toInt () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġusers List . name Ġ= Ġresult . getString ( result . getColumnIndex ( COL _ NAME )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġusers List . list Ġ= Ġresult . getString ( result . getColumnIndex ( COL _ LIST )) ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ Ġresult . close () ĊĠĠĠĠĠĠĠ Ġdb . close () ĊĠĠĠĠĠĠĠ Ġreturn Ġusers List ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġdelete Data () Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġdb Ġ= Ġthis . writable Database ĊĠĠĠĠĠĠĠ Ġdb . delete ( TABLE _ NAME , Ġnull , Ġnull ) ĊĠĠĠĠĠĠĠ Ġdb . close () ĊĠĠĠ Ġ} Ċ } Ċ