GETCWD — 현재 작업 디렉터리 가져오기

지금 프로그램이 어느 디렉터리에서 실행 중인지 알아야 할 때가 있어요. 파일을 상대 경로로 읽다 보면 '지금 내 위치가 어디지?' 싶은 순간이 꼭 생기죠. GETCWD는 현재 작업 디렉터리(current working directory)를 문자열로 돌려주는 내장 함수예요.

출처: gfortran 공식 문서 - GETCWD

본문

CALL GETCWD(C [, STATUS])
STATUS = GETCWD(C)

설명(Description)

현재 작업 디렉터리를 가져와요. 이 내장 기능은 서브루틴과 함수 두 형태로 모두 제공되는데, 하나의 프로그램 단위에서는 두 형태 중 하나만 쓸 수 있어요.

분류(Class)

서브루틴, 함수

인자(Arguments)

C — 타입이 CHARACTER이고 기본 kind여야 해요.
STATUS — (선택) 상태 플래그예요. 성공하면 0, 실패하면 시스템마다 다른 0이 아닌 오류 코드를 돌려줘요.

예제

PROGRAM test_getcwd
  CHARACTER(len=255) :: cwd
  CALL getcwd(cwd)
  WRITE(*,*) TRIM(cwd)
END PROGRAM

디렉터리 경로를 cwd에 받아서 그대로 출력하는 모습이에요. 출력할 때 TRIM을 쓰는 걸 볼 수 있는데, 뒤에 붙은 공백을 떼어내려는 거예요.

표준(Standard)

GNU 확장(GNU extension)이에요.

같이 보기

CHDIR — Change working directory