home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_progs / prog_oth / xprd687.lha / src / pn.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-06-27  |  565 b   |  26 lines
  1. #include <stdio.h>
  2. #include <string.h>
  3. #include <proto/dos.h>
  4. #include <proto/exec.h>
  5.  
  6. static void getpathname(BPTR lock,char *array)
  7. {
  8.     struct FileInfoBlock *fib=AllocMem(sizeof(struct FileInfoBlock),0);
  9.     BPTR newlock;
  10.     if(!fib||!lock) goto xit;
  11.     Examine(lock,fib);
  12.     getpathname(newlock=ParentDir(lock),array);            
  13.     strcat(array,fib->fib_FileName);
  14.     strcat(array,(newlock)?"/":":");
  15. xit:
  16.     if(fib) FreeMem(fib,sizeof(struct FileInfoBlock));
  17.     if(lock) UnLock(lock);
  18.     return;
  19. }
  20.  
  21. void getcdname(char *buffer)
  22. {
  23.     *buffer=0;
  24.     getpathname(Lock("",SHARED_LOCK),buffer);
  25. }    
  26.