ICODE-ADC/lammps
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

git-svn-id: svn://svn.icms.temple.edu/lammps-ro/trunk@26 f3b2605a-c512-4ea7-a41b-209d697bcdaa

Browse Source
This commit is contained in:
sjplimp
2006-09-27 19:51:33 +00:00
parent 3422cb245c
commit 222c95507e
536 changed files with 108384 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

54
src/shell.cpp Normal file
View File

@ -0,0 +1,54 @@
/* ----------------------------------------------------------------------
LAMMPS - Large-scale Atomic/Molecular Massively Parallel Simulator
www.cs.sandia.gov/~sjplimp/lammps.html
Steve Plimpton, sjplimp@sandia.gov, Sandia National Laboratories
Copyright (2003) Sandia Corporation. Under the terms of Contract
DE-AC04-94AL85000 with Sandia Corporation, the U.S. Government retains
certain rights in this software. This software is distributed under
the GNU General Public License.
See the README file in the top-level LAMMPS directory.
------------------------------------------------------------------------- */
#include "string.h"
#include "unistd.h"
#include "sys/stat.h"
#include "shell.h"
#include "comm.h"
#include "error.h"
/* ---------------------------------------------------------------------- */
void Shell::command(int narg, char **arg)
{
if (narg < 1) error->all("Illegal shell command");
if (strcmp(arg[0],"cd") == 0) {
if (narg != 2) error->all("Illegal shell command");
chdir(arg[1]);
} else if (strcmp(arg[0],"mkdir") == 0) {
if (narg < 2) error->all("Illegal shell command");
if (comm->me == 0)
for (int i = 1; i < narg; i++)
mkdir(arg[i], S_IRWXU | S_IRGRP | S_IXGRP);
} else if (strcmp(arg[0],"mv") == 0) {
if (narg != 3) error->all("Illegal shell command");
if (comm->me == 0) rename(arg[1],arg[2]);
} else if (strcmp(arg[0],"rm") == 0) {
if (narg < 2) error->all("Illegal shell command");
if (comm->me == 0)
for (int i = 1; i < narg; i++)
unlink(arg[i]);
} else if (strcmp(arg[0],"rmdir") == 0) {
if (narg < 2) error->all("Illegal shell command");
if (comm->me == 0)
for (int i = 1; i < narg; i++)
rmdir(arg[i]);
} else error->all("Illegal shell command");
}