home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c082_144 / 9.ddi / TVSRC.ZIP / TDIRLIST.CPP < prev    next >
Encoding:
C/C++ Source or Header  |  1992-06-10  |  6.1 KB  |  219 lines
  1. /*------------------------------------------------------------*/
  2. /* filename -       tdirlist.cpp                              */
  3. /*                                                            */
  4. /* function(s)                                                */
  5. /*                  TDirListBox member functions              */
  6. /*------------------------------------------------------------*/
  7.  
  8. /*------------------------------------------------------------*/
  9. /*                                                            */
  10. /*    Turbo Vision -  Version 1.0                             */
  11. /*                                                            */
  12. /*                                                            */
  13. /*    Copyright (c) 1991 by Borland International             */
  14. /*    All Rights Reserved.                                    */
  15. /*                                                            */
  16. /*------------------------------------------------------------*/
  17.  
  18. #define Uses_TDirListBox
  19. #define Uses_TEvent
  20. #define Uses_TDirCollection
  21. #define Uses_TChDirDialog
  22. #define Uses_TDirEntry
  23. #define Uses_TButton
  24. #include <tv.h>
  25.  
  26. #if !defined( __STRING_H )
  27. #include <String.h>
  28. #endif  // __STRING_H
  29.  
  30. #if !defined( __DIR_H )
  31. #include <Dir.h>
  32. #endif  // __DIR_H
  33.  
  34. #if !defined( __DOS_H )
  35. #include <Dos.h>
  36. #endif  // __DOS_H
  37.  
  38. TDirListBox::TDirListBox( const TRect& bounds, TScrollBar *aScrollBar ) :
  39.     TListBox( bounds, 1, aScrollBar ),
  40.     cur( 0 )
  41. {
  42.     *dir = EOS;
  43. }
  44.  
  45. TDirListBox::~TDirListBox()
  46. { 
  47.    if ( list() )
  48.       destroy( list() );
  49. }
  50.  
  51. void TDirListBox::getText( char *text, short item, short maxChars )
  52. {
  53.     strncpy( text, list()->at(item)->text(), maxChars );
  54.     text[maxChars] = '\0';
  55. }
  56.  
  57. void TDirListBox::handleEvent( TEvent& event )
  58. {
  59.     if( event.what == evMouseDown && event.mouse.doubleClick )
  60.         {
  61.         event.what = evCommand;
  62.         event.message.command = cmChangeDir;
  63.         putEvent( event );
  64.         clearEvent( event );
  65.         }
  66.     else
  67.         TListBox::handleEvent( event );
  68. }
  69.  
  70. Boolean TDirListBox::isSelected( short item )
  71. {
  72.     return Boolean( item == cur );
  73. }
  74.  
  75. void TDirListBox::showDrives( TDirCollection *dirs )
  76. {
  77.     Boolean isFirst = True;
  78.     char oldc[5];
  79.     strcpy( oldc, "0:\\" );
  80.     for( char c = 'A'; c <= 'Z'; c++ )
  81.         {
  82.         if( c < 'C' || driveValid( c ) )
  83.             {
  84.             if( oldc[0] != '0' )
  85.                 {
  86.                 char s[ 16 ];
  87.                 if( isFirst )
  88.                     {
  89.                     strcpy( s, firstDir );
  90.                     s[ strlen(firstDir) ] = oldc[0];
  91.                     s[ strlen(firstDir)+1 ] = EOS;
  92.                     isFirst = False;
  93.                     }
  94.                 else
  95.                     {
  96.                     strcpy( s, middleDir );
  97.                     s[ strlen(middleDir) ] = oldc[0];
  98.                     s[ strlen(middleDir)+1 ] = EOS;
  99.                     }
  100.                 dirs->insert( new TDirEntry( s, oldc ) );
  101.                 }
  102.             if( c == getdisk() + 'A' )
  103.                 cur = dirs->getCount();
  104.             oldc[0] = c;
  105.             }
  106.         }
  107.     if( oldc[0] != '0' )
  108.         {
  109.         char s[ 16 ];
  110.         strcpy( s, lastDir );
  111.         s[ strlen(lastDir) ] = oldc[0];
  112.         s[ strlen(lastDir)+1 ] = EOS;
  113.         dirs->insert( new TDirEntry( s, oldc ) );
  114.         }
  115. }
  116.  
  117. void TDirListBox::showDirs( TDirCollection *dirs )
  118. {
  119.     const indentSize = 2;
  120.     int indent = indentSize;
  121.  
  122.     char buf[MAXPATH+16];
  123.     memset( buf, ' ', sizeof( buf ) );
  124.     char *name = buf + sizeof(buf) - (MAXFILE+MAXEXT);
  125.  
  126.     char *org = name - strlen(pathDir);
  127.     strcpy( org, pathDir );
  128.  
  129.     char *curDir = dir;
  130.     char *end = dir + 3;
  131.     char hold = *end;
  132.     *end = EOS;         // mark end of drive name
  133.     strcpy( name, curDir );
  134.     dirs->insert( new TDirEntry( org, name ) );
  135.  
  136.     *end = hold;        // restore full path
  137.     curDir = end;
  138.     while( (end = strchr( curDir, '\\' )) != 0 )
  139.         {
  140.         *end = EOS;
  141.         strncpy( name, curDir, size_t(end-curDir) );
  142.         name[size_t(end-curDir)] = EOS;
  143.         dirs->insert( new TDirEntry( org - indent, dir ) );
  144.         *end = '\\';
  145.         curDir = end+1;
  146.         indent += indentSize;
  147.         }
  148.  
  149.     cur = dirs->getCount() - 1;
  150.  
  151.     end = strrchr( dir, '\\' );
  152.     char path[MAXPATH];
  153.     strncpy( path, dir, size_t(end-dir+1) );
  154.     end = path + unsigned(end-dir)+1;
  155.     strcpy( end, "*.*" );
  156.  
  157.     Boolean isFirst = True;
  158.     ffblk ff;
  159.     int res = findfirst( path, &ff, FA_DIREC );
  160.     while( res == 0 )
  161.         {
  162.         if( (ff.ff_attrib & FA_DIREC) != 0 && ff.ff_name[0] != '.' )
  163.             {
  164.             if( isFirst )
  165.                 {
  166.                 memcpy( org, firstDir, strlen(firstDir)+1 );
  167.                 isFirst = False;
  168.                 }
  169.             else
  170.                 memcpy( org, middleDir, strlen(middleDir)+1 );
  171.             strcpy( name, ff.ff_name );
  172.             strcpy( end, ff.ff_name );
  173.             dirs->insert( new TDirEntry( org - indent, path ) );
  174.             }
  175.         res = findnext( &ff );
  176.         }
  177.  
  178.     char *p = dirs->at(dirs->getCount()-1)->text();
  179.     char *i = strchr( p, graphics[0] );
  180.     if( i == 0 )
  181.         {
  182.         i = strchr( p, graphics[1] );
  183.         if( i != 0 )
  184.             *i = graphics[0];
  185.         }
  186.     else
  187.         {
  188.         *(i+1) = graphics[2];
  189.         *(i+2) = graphics[2];
  190.         }
  191. }
  192.  
  193. void TDirListBox::newDirectory( const char *str )
  194. {
  195.     strcpy( dir, str );
  196.     TDirCollection *dirs = new TDirCollection( 5, 5 );
  197.     dirs->insert( new TDirEntry( drives, drives ) );
  198.     if( strcmp( dir, drives ) == 0 )
  199.         showDrives( dirs );
  200.     else
  201.         showDirs( dirs );
  202.     newList( dirs );
  203.     focusItem( cur );
  204. }
  205.  
  206. void TDirListBox::setState( ushort nState, Boolean enable )
  207. {
  208.     TListBox::setState( nState, enable );
  209.     if( (nState & sfFocused) != 0 )
  210.         ((TChDirDialog *)owner)->chDirButton->makeDefault( enable );
  211. }
  212.  
  213. TStreamable *TDirListBox::build()
  214. {
  215.     return new TDirListBox( streamableInit );
  216. }
  217.  
  218.  
  219.