qbs* FUNC_IDEZPATHLIST(qbs*_FUNC_IDEZPATHLIST_STRING_PATH){
qbs *tqbs;
ptrszint tmp_long;
int32 tmp_fileno;
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
uint8 *tmp_mem_static_pointer=mem_static_pointer;
uint32 tmp_cmem_sp=cmem_sp;
#include "data389.txt"
mem_lock *sf_mem_lock;
new_mem_lock();
sf_mem_lock=mem_lock_tmp;
sf_mem_lock->type=3;
libqb_check_stack();
if (is_error_pending()) goto exit_subfunc;
do{
if(!qbevent)break;evnt(28182,15653,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING1_SEP,func_chr( 0 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15654,"ide_methods.bas");}while(r);
S_61010:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||is_error_pending()){
if(qbevent){evnt(28182,15656,"ide_methods.bas");if(r)goto S_61010;}
do{
sub_open(qbs_new_txt_len(".\\internal\\temp\\paths.txt",25), 4 ,NULL,NULL, 150 ,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15657,"ide_methods.bas");}while(r);
do{
sub_close( 150 ,1);
if(!qbevent)break;evnt(28182,15657,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_A,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15658,"ide_methods.bas");}while(r);
S_61014:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_IDEZPATHLIST_STRING_PATH, 1 ),qbs_new_txt_len(":",1))))||is_error_pending()){
if(qbevent){evnt(28182,15658,"ide_methods.bas");if(r)goto S_61014;}
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_A,qbs_new_txt_len("\\",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15658,"ide_methods.bas");}while(r);
}
do{
sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("dir /b /ON /AD ",15),FUNC_QUOTEDFILENAME(qbs_add(_FUNC_IDEZPATHLIST_STRING_PATH,_FUNC_IDEZPATHLIST_STRING_A))),qbs_new_txt_len(" >.\\internal\\temp\\paths.txt",27)),2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15659,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15660,"ide_methods.bas");}while(r);
do{
sub_open(qbs_new_txt_len(".\\internal\\temp\\paths.txt",25), 3 ,NULL,NULL, 150 ,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15661,"ide_methods.bas");}while(r);
S_61020:;
while((!(func_eof( 150 )))||is_error_pending()){
if(qbevent){evnt(28182,15662,"ide_methods.bas");if(r)goto S_61020;}
do{
tmp_fileno= 150 ;
if (is_error_pending()) goto skip7175;
sub_file_line_input_string(tmp_fileno,_FUNC_IDEZPATHLIST_STRING_A);
if (is_error_pending()) goto skip7175;
skip7175:
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15663,"ide_methods.bas");}while(r);
S_61022:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(28182,15664,"ide_methods.bas");if(r)goto S_61022;}
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,_FUNC_IDEZPATHLIST_STRING_A);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15664,"ide_methods.bas");}while(r);
}else{
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_add(qbs_add(_FUNC_IDEZPATHLIST_STRING_PATHLIST,_FUNC_IDEZPATHLIST_STRING1_SEP),_FUNC_IDEZPATHLIST_STRING_A));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15664,"ide_methods.bas");}while(r);
}
dl_continue_7174:;
}
dl_exit_7174:;
do{
sub_close( 150 ,1);
if(!qbevent)break;evnt(28182,15666,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEZPATHLIST_LONG_C= 0 ;
if(!qbevent)break;evnt(28182,15668,"ide_methods.bas");}while(r);
S_61030:;
fornext_value7177= 1 ;
fornext_finalvalue7177=_FUNC_IDEZPATHLIST_STRING_PATH->len;
fornext_step7177= 1 ;
if (fornext_step7177<0) fornext_step_negative7177=1; else fornext_step_negative7177=0;
if (is_error_pending()) goto fornext_error7177;
goto fornext_entrylabel7177;
while(1){
fornext_value7177=fornext_step7177+(*_FUNC_IDEZPATHLIST_LONG_X);
fornext_entrylabel7177:
*_FUNC_IDEZPATHLIST_LONG_X=fornext_value7177;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative7177){
if (fornext_value7177<fornext_finalvalue7177) break;
}else{
if (fornext_value7177>fornext_finalvalue7177) break;
}
fornext_error7177:;
if(qbevent){evnt(28182,15669,"ide_methods.bas");if(r)goto S_61030;}
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_B,func_mid(_FUNC_IDEZPATHLIST_STRING_PATH,*_FUNC_IDEZPATHLIST_LONG_X, 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15670,"ide_methods.bas");}while(r);
S_61032:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZPATHLIST_STRING_B,__STRING1_IDEPATHSEP)))||is_error_pending()){
if(qbevent){evnt(28182,15671,"ide_methods.bas");if(r)goto S_61032;}
do{
*_FUNC_IDEZPATHLIST_LONG_C=*_FUNC_IDEZPATHLIST_LONG_C+ 1 ;
if(!qbevent)break;evnt(28182,15671,"ide_methods.bas");}while(r);
}
fornext_continue_7176:;
}
fornext_exit_7176:;
S_61036:;
if ((-(*_FUNC_IDEZPATHLIST_LONG_C>= 1 ))||is_error_pending()){
if(qbevent){evnt(28182,15673,"ide_methods.bas");if(r)goto S_61036;}
S_61037:;
if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEZPATHLIST_STRING_PATHLIST->len))||is_error_pending()){
if(qbevent){evnt(28182,15674,"ide_methods.bas");if(r)goto S_61037;}
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_add(qbs_add(qbs_new_txt_len("..",2),_FUNC_IDEZPATHLIST_STRING1_SEP),_FUNC_IDEZPATHLIST_STRING_PATHLIST));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15674,"ide_methods.bas");}while(r);
}else{
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("..",2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15674,"ide_methods.bas");}while(r);
}
}
do{
*_FUNC_IDEZPATHLIST_LONG_D=(  int32  )logical_drives();
if(!qbevent)break;evnt(28182,15682,"ide_methods.bas");}while(r);
S_61044:;
fornext_value7181= 0 ;
fornext_finalvalue7181= 25 ;
fornext_step7181= 1 ;
if (fornext_step7181<0) fornext_step_negative7181=1; else fornext_step_negative7181=0;
if (is_error_pending()) goto fornext_error7181;
goto fornext_entrylabel7181;
while(1){
fornext_value7181=fornext_step7181+(*_FUNC_IDEZPATHLIST_LONG_I);
fornext_entrylabel7181:
*_FUNC_IDEZPATHLIST_LONG_I=fornext_value7181;
if (fornext_step_negative7181){
if (fornext_value7181<fornext_finalvalue7181) break;
}else{
if (fornext_value7181>fornext_finalvalue7181) break;
}
fornext_error7181:;
if(qbevent){evnt(28182,15683,"ide_methods.bas");if(r)goto S_61044;}
S_61045:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(qbs_right(_FUNC_IDEZPATHLIST_STRING_PATHLIST, 1 ),_FUNC_IDEZPATHLIST_STRING1_SEP))&(-(_FUNC_IDEZPATHLIST_STRING_PATHLIST->len> 0 ))))||is_error_pending()){
if(qbevent){evnt(28182,15684,"ide_methods.bas");if(r)goto S_61045;}
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_add(_FUNC_IDEZPATHLIST_STRING_PATHLIST,_FUNC_IDEZPATHLIST_STRING1_SEP));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15684,"ide_methods.bas");}while(r);
}
S_61048:;
if ((func__readbit(*_FUNC_IDEZPATHLIST_LONG_D,*_FUNC_IDEZPATHLIST_LONG_I))||is_error_pending()){
if(qbevent){evnt(28182,15685,"ide_methods.bas");if(r)goto S_61048;}
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_add(qbs_add(_FUNC_IDEZPATHLIST_STRING_PATHLIST,func_chr( 65 +*_FUNC_IDEZPATHLIST_LONG_I)),qbs_new_txt_len(":",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15686,"ide_methods.bas");}while(r);
}
fornext_continue_7180:;
}
fornext_exit_7180:;
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_IDEZPATHLIST,_FUNC_IDEZPATHLIST_STRING_PATHLIST);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15690,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,15691,"ide_methods.bas");}while(r);
}
S_61055:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||is_error_pending()){
if(qbevent){evnt(28182,15694,"ide_methods.bas");if(r)goto S_61055;}
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15695,"ide_methods.bas");}while(r);
do{
sub_open(qbs_new_txt_len("./internal/temp/paths.txt",25), 4 ,NULL,NULL, 150 ,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15696,"ide_methods.bas");}while(r);
do{
sub_close( 150 ,1);
if(!qbevent)break;evnt(28182,15696,"ide_methods.bas");}while(r);
do{
sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("find ",5),FUNC_QUOTEDFILENAME(_FUNC_IDEZPATHLIST_STRING_PATH)),qbs_new_txt_len(" -maxdepth 1 -mindepth 1 -type d >./internal/temp/paths.txt",59)),2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15697,"ide_methods.bas");}while(r);
do{
sub_open(qbs_new_txt_len("./internal/temp/paths.txt",25), 3 ,NULL,NULL, 150 ,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15698,"ide_methods.bas");}while(r);
S_61061:;
while((!(func_eof( 150 )))||is_error_pending()){
if(qbevent){evnt(28182,15699,"ide_methods.bas");if(r)goto S_61061;}
do{
tmp_fileno= 150 ;
if (is_error_pending()) goto skip7184;
sub_file_line_input_string(tmp_fileno,_FUNC_IDEZPATHLIST_STRING_A);
if (is_error_pending()) goto skip7184;
skip7184:
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15700,"ide_methods.bas");}while(r);
S_61063:;
if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEZPATHLIST_STRING_A->len== 0 )))||is_error_pending()){
if(qbevent){evnt(28182,15701,"ide_methods.bas");if(r)goto S_61063;}
do{
goto dl_exit_7183;
if(!qbevent)break;evnt(28182,15701,"ide_methods.bas");}while(r);
}
S_61066:;
fornext_value7187=_FUNC_IDEZPATHLIST_STRING_A->len;
fornext_finalvalue7187= 1 ;
fornext_step7187= -1 ;
if (fornext_step7187<0) fornext_step_negative7187=1; else fornext_step_negative7187=0;
if (is_error_pending()) goto fornext_error7187;
goto fornext_entrylabel7187;
while(1){
fornext_value7187=fornext_step7187+(*_FUNC_IDEZPATHLIST_LONG_X);
fornext_entrylabel7187:
*_FUNC_IDEZPATHLIST_LONG_X=fornext_value7187;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative7187){
if (fornext_value7187<fornext_finalvalue7187) break;
}else{
if (fornext_value7187>fornext_finalvalue7187) break;
}
fornext_error7187:;
if(qbevent){evnt(28182,15702,"ide_methods.bas");if(r)goto S_61066;}
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_A2,func_mid(_FUNC_IDEZPATHLIST_STRING_A,*_FUNC_IDEZPATHLIST_LONG_X, 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15703,"ide_methods.bas");}while(r);
S_61068:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZPATHLIST_STRING_A2,qbs_new_txt_len("/",1))))||is_error_pending()){
if(qbevent){evnt(28182,15704,"ide_methods.bas");if(r)goto S_61068;}
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_A,qbs_right(_FUNC_IDEZPATHLIST_STRING_A,_FUNC_IDEZPATHLIST_STRING_A->len-*_FUNC_IDEZPATHLIST_LONG_X));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15705,"ide_methods.bas");}while(r);
do{
goto fornext_exit_7186;
if(!qbevent)break;evnt(28182,15706,"ide_methods.bas");}while(r);
}
fornext_continue_7186:;
}
fornext_exit_7186:;
S_61073:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(28182,15709,"ide_methods.bas");if(r)goto S_61073;}
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,_FUNC_IDEZPATHLIST_STRING_A);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15709,"ide_methods.bas");}while(r);
}else{
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_add(qbs_add(_FUNC_IDEZPATHLIST_STRING_PATHLIST,_FUNC_IDEZPATHLIST_STRING1_SEP),_FUNC_IDEZPATHLIST_STRING_A));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15709,"ide_methods.bas");}while(r);
}
dl_continue_7183:;
}
dl_exit_7183:;
do{
sub_close( 150 ,1);
if(!qbevent)break;evnt(28182,15711,"ide_methods.bas");}while(r);
S_61080:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDEZPATHLIST_STRING_PATH,qbs_new_txt_len("/",1))))||is_error_pending()){
if(qbevent){evnt(28182,15713,"ide_methods.bas");if(r)goto S_61080;}
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_A,qbs_new_txt_len("..",2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15714,"ide_methods.bas");}while(r);
S_61082:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(28182,15716,"ide_methods.bas");if(r)goto S_61082;}
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,_FUNC_IDEZPATHLIST_STRING_A);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15716,"ide_methods.bas");}while(r);
}else{
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_add(qbs_add(_FUNC_IDEZPATHLIST_STRING_A,_FUNC_IDEZPATHLIST_STRING1_SEP),_FUNC_IDEZPATHLIST_STRING_PATHLIST));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15716,"ide_methods.bas");}while(r);
}
}
do{
qbs_set(_FUNC_IDEZPATHLIST_STRING_IDEZPATHLIST,_FUNC_IDEZPATHLIST_STRING_PATHLIST);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,15719,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,15720,"ide_methods.bas");}while(r);
}
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free389.txt"
if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static;
cmem_sp=tmp_cmem_sp;
qbs_maketmp(_FUNC_IDEZPATHLIST_STRING_IDEZPATHLIST);return _FUNC_IDEZPATHLIST_STRING_IDEZPATHLIST;
}
