FreeCalypso > hg > freecalypso-tools
annotate ffstools/cal2text/mkdir.c @ 582:deda54106c0e
doc/Target-boot-control: first draft
| author | Mychaela Falconia <falcon@freecalypso.org> |
|---|---|
| date | Mon, 03 Feb 2020 01:25:31 +0000 |
| parents | d41edd329670 |
| children |
| rev | line source |
|---|---|
|
142
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
1 #include <sys/types.h> |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
2 #include <sys/stat.h> |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
3 #include <stdio.h> |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
4 #include <stdlib.h> |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
5 #include <unistd.h> |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
6 |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
7 mkdir_existok(pathname) |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
8 char *pathname; |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
9 { |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
10 int rc; |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
11 struct stat st; |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
12 |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
13 rc = stat(pathname, &st); |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
14 if (rc < 0) { |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
15 rc = mkdir(pathname, 0777); |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
16 if (rc < 0) { |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
17 perror(pathname); |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
18 exit(1); |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
19 } |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
20 return(0); |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
21 } else { |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
22 if (S_ISDIR(st.st_mode)) |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
23 return(0); |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
24 else { |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
25 fprintf(stderr, |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
26 "error: %s already exists and is not a directory\n", |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
27 pathname); |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
28 exit(1); |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
29 } |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
30 } |
|
d41edd329670
fc-cal2text utility written, compiles
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
31 } |
