compiler/clib/chdir.c

   1 /*
   2     Copyright © 1995-2009, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     ANSI C function chdir().
   6 */
   7
   8 #include "__arosc_privdata.h"
   9
  10 #include <exec/types.h>
  11 #include <dos/dos.h>
  12 #include <proto/dos.h>
  13 #include <aros/symbolsets.h>
  14 #include <errno.h>
  15 #include "__errno.h"
  16 #include "__upath.h"
  17
  18 /*****************************************************************************
  19
  20     NAME */
  21 #include <unistd.h>
  22
  23         int chdir(
  24
  25 /*  SYNOPSIS */
  26         const char *path )
  27
  28 /*  FUNCTION
  29         Change the current working directory to the one specified by path.
  30
  31     INPUTS
  32         path - Path of the directory to change to.
  33
  34     RESULT
  35         If the current directory was changed successfully, zero is returned.
  36         Otherwise, -1 is returned and errno set apropriately.
  37
  38     NOTES
  39         At program exit, the current working directory will be changed back
  40         to the one that was current when the program first started. If you
  41         do not desire this behaviour, use dos.library/CurrentDir() instead.
  42         The path given to chdir can be translated so that getcwd gives back
  43         a string that is not the same but points to th same directory. For
  44         example, assigns are replaced by the path where the assign points to
  45         and device names (like DH0:) are replaced with the volume name
  46         (e.g. Workbench:).
  47
  48     EXAMPLE
  49
  50     BUGS
  51
  52     SEE ALSO
  53
  54     INTERNALS
  55
  56 ******************************************************************************/
  57 {
  58     BPTR oldlock;
  59     BPTR newlock;
  60
  61     path = __path_u2a(path);
  62
  63     if (path == NULL)
  64         return -1;
  65
  66     newlock = Lock( path, SHARED_LOCK );
  67
  68     if( newlock == BNULL )
  69     {
  70         errno = IoErr2errno( IoErr() );
  71         goto error;
  72     }
  73
  74     oldlock = CurrentDir( newlock );
  75
  76     if( __cd_changed )
  77     {
  78         UnLock( oldlock );
  79     }
  80     else
  81     {
  82         __cd_changed = TRUE;
  83         __cd_lock    = oldlock;
  84     }
  85
  86     return 0;
  87
  88 error:
  89     if( newlock != BNULL ) UnLock( newlock );
  90
  91     return -1;
  92 }
  93
  94 int __init_chdir(void)
  95 {
  96     __cd_changed = FALSE;
  97
  98     return 1;
  99 }
 100
 101 void __exit_chdir(void)
 102 {
 103     if( __cd_changed )
 104     {
 105         BPTR lock = CurrentDir( __cd_lock );
 106
 107         UnLock( lock );
 108     }
 109 }
 110
 111 ADD2INIT(__init_chdir, -100);
 112 ADD2EXIT(__exit_chdir, -100);