开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 界面编程 > 查看源码
FILEDIAL.CPP
资源名称：dos_gui.zip　[点击查看]
上传用户：wtrl82617
上传日期：2007-01-07
资源大小：187k
文件大小：11k
源码类别：

界面编程

开发平台：

DOS

FILEDIAL.CPP：源码内容
  1. // 1993 (c) ALL RIGHTS RESERVED
  2. // AUTHOR:  XuYongYong
  4. /* --------------------------------------------------------
  5.   FILEDIAL.CPP
  6.   Defines type TFileDialog.  This defines the basic
  7.   behavior of all file dialogs.
  8.   -------------------------------------------------------- */
  9. #include "yyxmain.h"
  10. #include "filedial.h"
  11. #include "msgbox.h"
  12. #include <string.h>
  13. #include <dir.h>
  14. #include <errno.h>
  15. /*
  16. char _FAR * _CType _FARFUNC _fullpath( char _FAR *__buf,
  17.                   const char _FAR *__path,
  18.                   size_t __maxlen );
  19. */
  20. /*
  21. extern "C" {
  22. char far* _fullpath (char far *__buf,const char far *__path,size_t __maxlen);
  23. }
  24. */
  25. int  filedial_class::get_sub_files (char *path_name,char **sub_files)
  26. {
  27. // return nums; -1:Error
  28.   struct ffblk ffblk;
  29.   int done;
  30.   int file_counter=0;
  32. done = findfirst(path_name,&ffblk, (FA_HIDDEN| FA_RDONLY |
  33.    FA_SYSTEM | FA_LABEL |FA_ARCH ) );
  34. if (done==ENOENT) return -1;
  35. while (!done)
  36. {
  37. if ( !(ffblk.ff_attrib & FA_DIREC)) {
  38. // strcpy ( ((FILENAMESTRING *)sub_files )[file_counter],ffblk.ff_name );
  39. strcpy (sub_files[file_counter],ffblk.ff_name );
  40. file_counter ++;
  41. }
  42. done = findnext(&ffblk);
  43. }
  44. return file_counter;
  45. }
  47. int  filedial_class::get_sub_dires (char *dir_name,char **sub_dires)
  48. {
  49. //return nums; -1:Error  ADDING [A][B][C][D] etc;
  50.   struct ffblk ffblk;
  51.   int done ,i;
  52.   int dir_counter =0;
  53.   char path[100];
  54. //  char * disk[10]={"A:","B:","C:","D:","E:","F:" };
  55.   char * disk[10]={"A:","B:","C:","D:","E:","F:" };
  57. strcpy(path,dir_name); //E.G "dos"
  58. strcat(path,"*.*");
  59. done = findfirst(path,&ffblk, (FA_DIREC /*| FA_HIDDEN| FA_RDONLY |
  60.    FA_SYSTEM | FA_LABEL |FA_ARCH */ ) );
  61. if (done==ENOENT) return -1;
  62. while (!done)
  63. {
  64. if ((ffblk.ff_attrib & FA_DIREC) && (strcmp(ffblk.ff_name,"."))) {
  65. strcpy (sub_dires[dir_counter],ffblk.ff_name );
  66. dir_counter ++;
  67. }
  68. done = findnext(&ffblk);
  69. }
  70. for (i=0;i< /*int disknum=setdisk(getdisk())*/ 4 ; i++ ) {
  71. strcpy (sub_dires[dir_counter],disk[i]);
  72. dir_counter ++;
  73. }
  74. return dir_counter;
  75. }
  77. BOOL  filedial_class::haswildcards(char *pathname)
  78. { register i;
  79. for (i=strlen (pathname)-1; (i>=0) && pathname[i] !='\'; i-- )
  80. if ((pathname[i] =='*') || (pathname[i] =='?')) return TRUE;
  81. return FALSE;
  82. }
  84. char * filedial_class::getfilename(char *pathname)
  85. {
  86.   char *p;
  88. p = strrchr(pathname, '\');
  89. if ( !p )
  90. p = strrchr(pathname, ':');
  91. if ( !p )
  92. return pathname;
  93. else
  94. return p + 1;
  95. }
  97. int   filedial_class::analyse_edit_filename(char *buf)
  98. {
  99.   struct ffblk ffblk;
  100.   int done;
  101. // input:: edit_filename
  102. // if part path ,connect with dirname
  103. if ((! strchr(edit_filename,':') ) && (edit_filename[0] !='\' )){
  104. strcpy (buf,dirname);
  105. strcat (buf,edit_filename);
  106. strcpy (edit_filename,buf);
  107. }
  108. ////////////////////////////////////// !!!!!!!!!! BC3.0
  109. _fullpath(buf, edit_filename, MAXPATH);
  110. // now I should realize fullpath ,as .. . etc in tc1.00
  111. // strcpy (buf,edit_filename);
  112. /*  Now c:dos ----> c:dos
  113. but c:      ----> c:
  114. */
  115. if  ( buf[strlen(buf)-1] == '\' )  buf[strlen(buf)-1] ='';
  116. /*  Now c:dos ----> c:dos
  117. and c:     ----> c:
  118. */
  119. if ( haswildcards (edit_filename ) == TRUE ) {
  120. strcpy (wildcards, getfilename  (buf));
  121. (getfilename(buf))[0] ='';
  122. if  ( buf[strlen(buf)-1] == '\' )  buf[strlen(buf)-1] ='';
  123. }  else { // split wildcards     from buf
  124. // assume wildcards not contains '';
  125. if (!strcmp (wildcards,"*.*"))  strcpy (wildcards,"*.*" );
  126. }
  127. done = findfirst( buf ,&ffblk, ( FA_DIREC| FA_HIDDEN| FA_RDONLY |
  128.    FA_SYSTEM | FA_LABEL |FA_ARCH  ) );
  129. // perror (sys_errlist[errno]);
  130. if ( (done)&&(buf[strlen(buf)-1]!=':') ) {
  131. // ; no such file or directory      c:dos
  132. // since root directory is the exception c:
  133.   char buf1[100];
  134. strcpy (buf1,buf);
  135. getfilename(buf1)[0] ='';
  136. strcat (buf1,"*.*");
  137. done = findfirst( buf1 ,&ffblk, FA_DIREC );
  138. if (done ) return 0;     //error path
  139. else  return 3;          //true dirname, no file
  140. ;
  141. }   else { // exists such file or directory
  142. if( !(ffblk.ff_attrib & FA_DIREC) && (buf[strlen(buf)-1]!=':') ) {
  143. //buf is a existed file // ??
  144. return 1;
  145. } else { // is an existing directory
  146. return 2;
  147. }
  148. }
  149. }
  151. BOOL  filedial_class:: change_edit_filename()
  152. {
  153.   char buf[100];
  154.   int i=analyse_edit_filename(buf);
  156. strcpy (edit_filename,wildcards);
  158. switch (i) {
  159. case 0:
  160. case 3: return FALSE; //other information
  161. case 1: strcpy (pathname ,buf ); //existed file
  162. strcpy (dirname, buf);
  163. strcat (dirname,"\");
  164. getfilename(buf)[0] ='';
  165. return TRUE;
  166. case 2: //existed directory
  167. strcat (buf,"\");
  168. strcpy (dirname ,buf );  //dirname  use for sub_dires' search
  169. strcpy (pathname  ,buf );  //pathname use for sub_files' search
  170. strcat (pathname  ,wildcards );
  171. return FALSE;
  172. }
  173. // NO need Return A value
  174. return FALSE;
  175. }
  177. filedial_class::filedial_class(int ID,char *title,int left,int top,int width,int height,
  178. int atype, char *apath )
  179. :dialog_class(ID,title,left,top,width,height)
  180. {
  181.   int i;
  183. achFile =apath;     // a Path For the last time
  184. dial_type =atype;
  185. for (i=0;i<MAXFILES;i++ ) { files[i]=new FILENAMESTRING;
  186. if ( files[i]==NULL) error("Less memory");
  187. }
  188. for (i=0;i<MAXDIRES;i++ ) { dires[i]=new FILENAMESTRING;
  189. if ( dires[i]==NULL) error("Less memory");
  190. }
  192. // putch('07');
  193. dirname[0]='';
  194. pathname[0]='';
  195. strcpy (edit_filename,apath);
  196. change_edit_filename();
  198. // putch('07');
  199. if (!(filesnum=get_sub_files (pathname,files ))) filesnum=0;
  200. if (!(diresnum=get_sub_dires (dirname,dires ))) diresnum=0;
  201. // putch('07');
  203. insert_control( dires_listscrl =new Tlistscrl (DIRES_ID,"&Directories",216,80,150,100,
  204. diresnum,dires) );
  205. insert_control( files_listscrl =new Tlistscrl (FILES_ID,"&Files",16,80,160,100,
  206. filesnum,files) );
  207. if ( dial_type == SD_FILESAVE ) {
  208. files_listscrl->status |=INVISIBLE;
  209. files_listscrl->status |=DISABLE;
  210. }
  211. insert_control( file_tedit =new Ttedit (EDIT_ID,"File&name",16,32,128,22 ,
  212. edit_filename, 25 ) );
  213. insert_control( dir_tstatic =new Tstatic (13,"Directory",
  214. 206,30,150,20, dirname ,ALIGN_LEFT ) );
  215. canclose =FALSE;
  216. }
  218. filedial_class::~filedial_class ()
  219. { int i;
  220. for (i=0;i<MAXFILES;i++ ) if (files[i]!=NULL )delete files[i];
  221. for (i=0;i<MAXDIRES;i++ ) if (dires[i]!=NULL )delete dires[i];
  222. }
  225. void filedial_class::updatelists( )
  226. {
  227. change_edit_filename();
  228. if (!(filesnum=get_sub_files (pathname,files ))) filesnum=0;
  229. if (!(diresnum=get_sub_dires (dirname,dires ))) diresnum=0;
  231. strcpy (file_tedit->text,edit_filename);
  232. file_tedit ->update_control();
  234. strcpy (dir_tstatic->text, dirname);
  235. dir_tstatic ->draw ();
  237. files_listscrl->listbox->max_value =filesnum -1;
  238. files_listscrl->listbox->current_value=-1;
  239. files_listscrl ->update_control();
  241. dires_listscrl->listbox->max_value =diresnum -1;
  242. dires_listscrl->listbox->current_value=-1;
  243. dires_listscrl ->update_control();
  244. }
  246. BOOL filedial_class::disk_ready (int disk_num ) // 0,1,2,3,
  247. {
  248.   struct dfree adfree;
  250. Redo:
  251. getdfree(disk_num+1, &adfree);
  252. if ( diskerrorno != 0 ) {
  253. if (theprogram->exec_dialog(new Tmsgbox("Message",msgbuf,MB_RETRYCANCEL))
  254. != Dlg_OK ) { diskerrorno =0; return FALSE; }
  255. else { diskerrorno =0; goto Redo ;}
  256. }
  257. if ( adfree.df_sclus  == 0xFFFF ) return FALSE; else return TRUE;
  258. // On error df_sclus in the dfree structure to 0xFFFF
  259. }
  261. int filedial_class::msg_handler (MSG& message)
  262. { int done ;
  263.   char buf[100];
  265. switch (message.Action) {
  266. case EditInputedMSG:
  267. if (message.fptr==file_tedit) {
  268. strcpy (edit_filename,file_tedit->text);
  269. if (( analyse_edit_filename(buf) ==1 ) ||
  270. ((analyse_edit_filename(buf) ==3 )&&(dial_type==SD_FILESAVE))
  271.    ) {
  272. // thequeue.SendMessage(ok_button->ID,
  273. // ButtonPushedMSG,ok_button);
  274. // Note::EditInputedMSG--------->
  275. return TRUE;
  276. } else {
  277. updatelists ();
  278. return TRUE;
  279. }
  280. }
  281. break;
  282. // after you selected sth
  283. case ListBoxItemSelectedMSG:
  284.  // if (message.ID==((FILES_ID <<8)|222)) {
  285. if((message.fptr==files_listscrl->listbox) &&
  286.    (files_listscrl->listbox->current_value>=files_listscrl->listbox->min_value)&&
  287.    (files_listscrl->listbox->current_value<=files_listscrl->listbox->max_value )
  288.   ) {
  289. // now selected one file
  290. thequeue.SendMessage(ok_button->ID,
  291. ButtonPushedMSG,ok_button);
  292. return TRUE;
  293. } else
  294. // if (message.ID==((DIRES_ID <<8)|222)) {
  295. if((message.fptr==dires_listscrl->listbox) &&
  296.    (dires_listscrl->listbox->current_value>=dires_listscrl->listbox->min_value)&&
  297.    (dires_listscrl->listbox->current_value<=dires_listscrl->listbox->max_value )
  298.   ) {
  299. //  int disknum =setdisk(getdisk());
  300.   int disknum =4; //NOte::when many disk exits
  301.   int real_dir_num =dires_listscrl->listbox->max_value -disknum+1;
  302. if (dires_listscrl->listbox->current_value >=
  303. dires_listscrl->listbox->max_value -disknum+1
  304.    )  { // A: B: etc
  305.   int new_disk=dires_listscrl->listbox->current_value-real_dir_num;
  306. while ( !disk_ready(new_disk) )
  307. if (theprogram->exec_dialog(new Tmsgbox
  308. ("Message","Disk Not Ready",MB_RETRYCANCEL)) ==Dlg_CANCEL)
  309. return TRUE;
  310. strcpy (dirname ,"");
  311. } else  ; //NORMAL DIRECTORY
  312. strcpy (edit_filename,dirname);
  313. strcat (edit_filename,dires_listscrl->listbox->string_list[
  314. dires_listscrl->listbox->current_value]);
  315. updatelists ();
  316. return TRUE;
  317. }
  318.  // As you are selecting
  319.  // <--- ---> ^V etc
  320. case ListBoxValueChangedMSG:
  321. if((message.fptr==files_listscrl->listbox) &&
  322.    (files_listscrl->listbox->current_value>=files_listscrl->listbox->min_value)&&
  323.    (files_listscrl->listbox->current_value<=files_listscrl->listbox->max_value )
  324.   ) {
  325. strcpy (file_tedit->text,files_listscrl->listbox->string_list[
  326. files_listscrl->listbox->current_value]);
  327. file_tedit ->update_control();
  328. // return TRUE; //For listscrl use
  329. break;
  330. } else
  331. // FROM dires_listscrl, changed one selection
  332. if((message.fptr==dires_listscrl->listbox) &&
  333.    (dires_listscrl->listbox->current_value>=dires_listscrl->listbox->min_value)&&
  334.    (dires_listscrl->listbox->current_value<=dires_listscrl->listbox->max_value )
  335.   ) {
  336. strcpy (file_tedit->text,dires_listscrl->listbox->string_list[
  337. dires_listscrl->listbox->current_value]);
  338. if (file_tedit->text[strlen(file_tedit->text)-1] !=':')
  339. strcat (file_tedit->text, "\");
  340. strcat (file_tedit->text,wildcards);
  341. file_tedit ->update_control();
  342. // return TRUE; //For listscrl use
  343. break;
  344. }
  345. }
  346. return dialog_class::msg_handler (message);
  348. }
  351. BOOL filedial_class::func_canclose()
  352. {
  353.   char buf[100];
  355. strcpy (edit_filename, file_tedit->text);
  356. switch ( dial_type ) {
  357. case SD_FILESAVE :
  358. if ( ( analyse_edit_filename(buf) ==1 ) || (analyse_edit_filename(buf) ==3 )
  359.    ) {
  360. strcpy (achFile, buf );
  361. return TRUE;
  362. }; break;
  363. case SD_FILEOPEN :
  364. if ( analyse_edit_filename(buf) ==1 ) {
  365. strcpy (achFile, buf );
  366. return TRUE;
  367. }; break;
  368. } // switch
  369. theprogram->exec_dialog(new Tmsgbox
  370. ("Message","Sorry, Please Select a File",MB_OK));
  371. return FALSE;
  372. }