Mercurial > hg > xemacs-beta
view lib-src/make-path.c @ 2536:7edc33019aa4
[xemacs-hg @ 2005-01-31 20:01:49 by ben]
Documentation updates
GETTING.GNU.SOFTWARE, Makefile.in.in: Delete GETTING.GNU.SOFTWARE from SOURCES.
PROBLEMS: Delete reference to check_cygwin_setup.sh.
Delete stuff that is irrelevant, mislocated or woefully out-of-date.
GNU, SERVICE: Delete.
* ORDERS, ORDERS.EUROPE, ORDERS.JAPAN: Delete.
* CHARSETS, CODINGS: Delete.
* DEBUG, LPF, MORE.STUFF, MOTIVATION: Delete.
aliases.ksh: Delete. (moved to xemacs-builds/steve)
* README.HYPERBOLE, README.OO-BROWSER: Delete.
* chr.png, chrm.png: Move to photos/.
check_cygwin_setup.sh: Delete.
* gnu.xpm, gnu.xbm, sink.xbm: Delete.
* ms-kermit, ms-kermit-7bit: Delete.
TERMS: Delete.
* DISTRIB, FTP, MACHINES, MAILINGLISTS, PACKAGES:
Delete and move to FAQ.
BETA: Delete and move to man/beta.texi.
README: Update.
help.el: Removed.
xemacs/help.texi: Delete references to DISTRIB. Point to FAQ.
xemacs/new.texi: Update sample code for version checking.
xemacs/xemacs.texi: Delete references to DISTRIB. Point directly to web site.
Update stuff referring to GNU Emacs. Delete references to Win-Emacs.
Makefile: Add beta.texi and built files.
xemacs-faq.texi: Major overhaul of section 1. Add mailing list info, update
downloading info, add info on CVS, etc.
xemacs.mak: Also copy BUGS, README, COPYING and Installation.
author | ben |
---|---|
date | Mon, 31 Jan 2005 20:01:50 +0000 (2005-01-31) |
parents | 023b83f4e54b |
children | ed624ab64583 |
line wrap: on
line source
/* Make all the directories along a path. Copyright (C) 1992 Free Software Foundation, Inc. This file is part of XEmacs. XEmacs is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2, or (at your option) any later version. XEmacs is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with XEmacs; see the file COPYING. If not, write to the Free the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ /* Synched up with: FSF 19.28. */ /* This program works like mkdir, except that it generates intermediate directories if they don't exist. This is just like the `mkdir -p' command on most systems; unfortunately, the mkdir command on some of the purer BSD systems (like Mt. Xinu) don't have that option. */ #ifdef emacs #include <config.h> #endif #include <sys/types.h> #include <sys/stat.h> #include <stdio.h> #include <errno.h> char *prog_name; static int touchy_mkdir (char *path) { struct stat buf; /* If PATH already exists and is a directory, return success. */ if (stat (path, &buf) >= 0 && (buf.st_mode & S_IFMT) == S_IFDIR) return 0; /* Otherwise, try to make it. If PATH exists but isn't a directory, this will signal an error. */ if (mkdir (path, 0777) < 0) { fprintf (stderr, "%s: ", prog_name); perror (path); return 1; } return 0; } int main (int argc, char *argv[]) { prog_name = *argv; for (argc--, argv++; argc > 0; argc--, argv++) { char *path = *argv; int i; /* Stop at each slash in path and try to create the directory. Skip any initial slash. */ for (i = (path[0] == '/') ? 1 : 0; path[i]; i++) if (path[i] == '/') { path[i] = '\0'; if (touchy_mkdir (path) < 0) goto next_pathname; path[i] = '/'; } touchy_mkdir (path); next_pathname: ; } return 0; }