lunes, 29 de febrero de 2016

COMPUTER SIMULATION OF LIQUIDS, M.P. ALLEN, montecarlo

[roberto@nautilus tools]$ rpm
   RPM version 4.0.4
   Copyright (C) 1998-2000 - Red Hat, Inc.
   This program may be freely redistributed under the terms of the GNU GPL

Usage: rpm {--help}
rpm {--version}
[roberto@nautilus tools]$ rpm nmap*.rpm
   RPM version 4.0.4
   Copyright (C) 1998-2000 - Red Hat, Inc.
   This program may be freely redistributed under the terms of the GNU GPL

Usage: rpm {--help}
rpm {--version}
[roberto@nautilus tools]$ rpm --help
Usage: rpm [OPTION...]

   Query options (with -q or --query):
   -c, --configfiles                list all configuration files
   -d, --docfiles                   list all documentation files
   --dump                           dump basic file information
   -l, --list                       list files in package
   --queryformat=QUERYFORMAT        use the following query format
-s, --state                      display the states of the listed files
-v, --verbose                    display a verbose file listing
-a, --all                        query/verify all packages
-f, --file                       query/verify package(s) owning file
-g, --group                      query/verify package(s) in group
-p, --package                    query/verify a package file (i.e. a binary
*.rpm file)
--querytags                      display known query tags
--specfile                       query a spec file
--whatrequires                   query/verify the package(s) which require a
dependency
--whatprovides                   query/verify the package(s) which provide a
dependency

Verify options (with -V or --verify):
--nomd5[|=0x1]                   don't verify MD5 digest of files
   --nofiles[|=0x10000]             don't verify files in package
   --nodeps[|=0x20000]              don't verify package dependencies
   --noscript[|=0x40000]            don't execute %verifyscript (if any)
   -a, --all                        query/verify all packages
   -f, --file                       query/verify package(s) owning file
   -g, --group                      query/verify package(s) in group
   -p, --package                    query/verify a package file (i.e. a binary
*.rpm file)
   --querytags                      display known query tags
   --specfile                       query a spec file
   --whatrequires                   query/verify the package(s) which require a
   dependency
   --whatprovides                   query/verify the package(s) which provide a
   dependency

   Signature options:
   --addsign                        add a signature to a package
   --resign                         sign a package (discard current signature)
   -K, --checksig                   verify package signature
   --nogpg[&=~0x4]                  skip any GPG signatures
--nomd5[&=~0x2]                  do not verify file md5 checksums

  Database options:
  --initdb                         initialize database
  --rebuilddb                      rebuild database inverted lists from
  installed package headers

  Install/Upgrade/Erase options:
  --allfiles[|=0x40]               install all files, even configurations
which might otherwise be skipped
--allmatches[|=0x2]              remove all packages which match <package>
(normally an error is generated if
<package> specified multiple packages)
--badreloc[|=0x8]                relocate files in non-relocateable package
-e, --erase=<package>+           erase (uninstall) package
--excludedocs[|=0x20]            do not install documentation
--excludepath=<path>             skip files with leading component <path>
--force[|=0x74]                  short hand for --replacepkgs --replacefiles
 -F, --freshen=<packagefile>+     upgrade package(s) if already installed
-h, --hash[|=0x2]                print hash marks as package installs (good
with -v)
--ignorearch[|=0x2]              don't verify package architecture
   --ignoreos[|=0x1]                don't verify package operating system
   --ignoresize[|=0x180]            don't check disk space before installing
   --includedocs                    install documentation
   --install=<packagefile>+         install package
--justdb[|=0x8]                  update the database, but do not modify the
filesystem
--nodeps                         do not verify package dependencies
--noorder[|=0x8]                 do not reorder package installation to
satisfy dependencies
--noscripts[|=0xff0000]          do not execute package scriptlet(s)
--notriggers[|=0x990000]         do not execute any scriptlet(s) triggered
  by this package
  --oldpackage[|=0x40]             upgrade to an old version of the package
 (--force on upgrades does this
  automatically)
 --percent[|=0x1]                 print percentages as package installs
 --prefix=<dir>                   relocate the package to <dir>, if
relocatable
--relocate=<old>=<new>           relocate files from path <old> to <new>
  --repackage[|=0x400]             save erased package files by repackaging
--replacefiles[|=0x30]           install even if the package replaces
 installed files
 --replacepkgs[|=0x4]             reinstall if the package is already present
--test[|=0x1]                    don't install, but tell if it would work or
   not
   -U, --upgrade=<packagefile>+     upgrade package(s)

Common options for all rpm modes:
--version                        print the version of rpm being used
--quiet                          provide less detailed output
-v, --verbose                    provide more detailed output
--define='<name> <body>'         define macro <name> with value <body>
 --eval=<expr>+                   print macro expansion of <expr>+
-r, --root=<dir>                 use <dir> as the top level directory
(default: "/")
--macros=<file:...>              read <file:...> instead of default macro
file(s)
--rcfile=<file:...>              read <file:...> instead of default rpmrc
file(s)
--showrc                         display final rpmrc and macro configuration

Options implemented via popt alias/exec:
--scripts                        list install/erase scriptlets from
package(s)
--setperms                       set permissions of files in a package
--setugids                       set user/group ownership of files in a
package
--conflicts                      list capabilities this package conflicts
with
--obsoletes                      list other packages removed by installing
this package
--provides                       list capabilities that this package provides
--requires                       list capabilities required by package(s)
--info                           list descriptive information from package(s)
--changelog                      list change logs for this package
--triggers                       list trigger scriptlets from package(s)
--last                           list package(s) by install time, most
recent first
--filesbypkg                     list all files from each package
--redhatprovides                 find package name that contains a provided
capability (needs rpmdb-redhat package
installed)
--redhatrequires                 find package name that contains a required
capability (needs rpmdb-redhat package
installed)
--buildpolicy=<policy>           set buildroot <policy> (e.g. compress man
  pages)
  --with=<option>                  enable configure <option> for build
 --without=<option>               disable configure <option> for build

Help options:
-?, --help                       Show this help message
--usage                          Display brief usage message


unexpected token `file)'
[roberto@nautilus tools]$   --querytags                      display known query tags
bash: --querytags: command not found
[roberto@nautilus tools]$   --specfile                       query a spec file
bash: --specfile: command not found
[roberto@nautilus tools]$   --whatrequires                   query/verify the package(s) which require a
bash: syntax error near unexpected token `package(s'
[roberto@nautilus tools]$                                    dependency
bash: dependency: command not found
[roberto@nautilus tools]$   --whatprovides                   query/verify the package(s) which provide a
bash: syntax error near unexpected token `package(s'
[roberto@nautilus tools]$                                    dependency
bash: dependency: command not found
[roberto@nautilus tools]$
[roberto@nautilus tools]$ Signature options:
bash: Signature: command not found
[roberto@nautilus tools]$   --addsign                        add a signature to a package
bash: --addsign: command not found
[roberto@nautilus tools]$   --resign                         sign a package (discard current signature)
bash: syntax error near unexpected token `(d'
[roberto@nautilus tools]$   -K, --checksig                   verify package signature
bash: -K,: command not found
[roberto@nautilus tools]$   --nogpg[&=~0x4]                  skip any GPG signatures
bash: --nogpg[: command not found
[1] 10542
bash: =~0x4]: command not found
[1]+  Exit 127                --nogpg[
[roberto@nautilus tools]$   --nomd5[&=~0x2]                  do not verify file md5 checksums
bash: --nomd5[: command not found
[1] 10544
bash: =~0x2]: command not found
[1]   Exit 127                --nomd5[
[roberto@nautilus tools]$
[roberto@nautilus tools]$ Database options:
bash: Database: command not found
[roberto@nautilus tools]$   --initdb                         initialize database
bash: --initdb: command not found
[roberto@nautilus tools]$   --rebuilddb                      rebuild database inverted lists from
bash: --rebuilddb: command not found
[roberto@nautilus tools]$                                    installed package headers
bash: installed: command not found
[roberto@nautilus tools]$
[roberto@nautilus tools]$ Install/Upgrade/Erase options:
bash: Install/Upgrade/Erase: No such file or directory
[roberto@nautilus tools]$   --allfiles[|=0x40]               install all files, even configurations
bash: --allfiles[: command not found
bash: =0x40]: command not found
[roberto@nautilus tools]$                                    which might otherwise be skipped
/usr/bin/which: no might in (/usr/local/bin:/bin:/usr/bin:/usr/X11R6/bin:/usr/local/grace/bin/:/home/roberto/bin)
/usr/bin/which: no otherwise in (/usr/local/bin:/bin:/usr/bin:/usr/X11R6/bin:/usr/local/grace/bin/:/home/roberto/bin)
/usr/bin/which: no be in (/usr/local/bin:/bin:/usr/bin:/usr/X11R6/bin:/usr/local/grace/bin/:/home/roberto/bin)
/usr/bin/which: no skipped in (/usr/local/bin:/bin:/usr/bin:/usr/X11R6/bin:/usr/local/grace/bin/:/home/roberto/bin)
[roberto@nautilus tools]$   --allmatches[|=0x2]              remove all packages which match <package>
bash: syntax error near unexpected token `<package>'
[roberto@nautilus tools]$                                    (normally an error is generated if
>                                    <package> specified multiple packages)
bash: normally: command not found
bash: package: No such file or directory
[roberto@nautilus tools]$   --badreloc[|=0x8]                relocate files in non-relocateable package
bash: --badreloc[: command not found
bash: =0x8]: command not found
[roberto@nautilus tools]$   -e, --erase=<package>+           erase (uninstall) package
bash: syntax error near unexpected token `(u'
[roberto@nautilus tools]$   --excludedocs[|=0x20]            do not install documentation
bash: --excludedocs[: command not found
bash: =0x20]: command not found
[roberto@nautilus tools]$   --excludepath=<path>             skip files with leading component <path>
bash: syntax error near unexpected token `<path>'
[roberto@nautilus tools]$   --force[|=0x74]                  short hand for --replacepkgs --replacefiles
bash: --force[: command not found
bash: =0x74]: command not found
[roberto@nautilus tools]$   -F, --freshen=<packagefile>+     upgrade package(s) if already installed
bash: syntax error near unexpected token `package(s'
[roberto@nautilus tools]$   -h, --hash[|=0x2]                print hash marks as package installs (good
bash: syntax error near unexpected token `(g'
[roberto@nautilus tools]$     ed output
output: No such file or directory

?
[roberto@nautilus tools]$ who
roberto  pts/0    Jun 20 18:29
[roberto@nautilus tools]$ ls
dumpacl.zip             john-16w.zip    nmap-2.53-1.i386.rpm         pwdump2.zip
firewalk-0.99.1.tar.gz  lc3setup01.exe  nvx005.zip                   sid.zip
foundstone tools        Mis documentos  pandora_linux_v4.0_b2.1.tgz  thcscan.zip
icmpquery.c.txt         Mis imágenes    pan_online_95_b2.zip         whisker.zip
john-1.6.tar.gz         nessus          pan_online_nt_b2.zip
[roberto@nautilus tools]$ tar
tar: You must specify one of the `-Acdtrux' options
Try `tar --help' for more information.
[roberto@nautilus tools]$ tar --help
GNU `tar' saves many files together into a single tape or disk archive, and
can restore individual files from the archive.

Usage: tar [OPTION]... [FILE]...

Examples:
  tar -cf archive.tar foo bar  # Create archive.tar from files foo and bar.
  tar -tvf archive.tar         # List all files in archive.tar verbosely.
  tar -xf archive.tar          # Extract all files from archive.tar.

If a long option shows an argument as mandatory, then it is mandatory
for the equivalent short option also.  Similarly for optional arguments.

Main operation mode:
  -t, --list              list the contents of an archive
  -x, --extract, --get    extract files from an archive
  -c, --create            create a new archive
  -d, --diff, --compare   find differences between archive and file system
  -r, --append            append files to the end of an archive
  -u, --update            only append files newer than copy in archive
  -A, --catenate          append tar files to an archive
      --concatenate       same as -A
      --delete            delete from the archive (not on mag tapes!)

Operation modifiers:
  -W, --verify               attempt to verify the archive after writing it
      --remove-files         remove files after adding them to the archive
  -k, --keep-old-files       don't replace existing files when extracting
      --overwrite            overwrite existing files when extracting
      --overwrite-dir        overwrite directory metadata when extracting
  -U, --unlink-first         remove each file prior to extracting over it
      --recursive-unlink     empty hierarchies prior to extracting directory
  -S, --sparse               handle sparse files efficiently
  -O, --to-stdout            extract files to standard output
  -G, --incremental          handle old GNU-format incremental backup
  -g, --listed-incremental=FILE
                             handle new GNU-format incremental backup
      --ignore-failed-read   do not exit with nonzero on unreadable files

Handling of file attributes:
      --owner=NAME             force NAME as owner for added files
      --group=NAME             force NAME as group for added files
      --mode=CHANGES           force (symbolic) mode CHANGES for added files
      --atime-preserve         don't change access times on dumped files
  -m, --modification-time      don't extract file modified time
      --same-owner             try extracting files with the same ownership
      --no-same-owner          extract files as yourself
      --numeric-owner          always use numbers for user/group names
  -p, --same-permissions       extract permissions information
      --no-same-permissions    do not extract permissions information
      --preserve-permissions   same as -p
  -s, --same-order             sort names to extract to match archive
      --preserve-order         same as -s
      --preserve               same as both -p and -s

Device selection and switching:
  -f, --file=ARCHIVE             use archive file or device ARCHIVE
      --force-local              archive file is local even if has a colon
      --rsh-command=COMMAND      use remote COMMAND instead of rsh
  -[0-7][lmh]                    specify drive and density
  -M, --multi-volume             create/list/extract multi-volume archive
  -L, --tape-length=NUM          change tape after writing NUM x 1024 bytes
  -F, --info-script=FILE         run script at end of each tape (implies -M)
      --new-volume-script=FILE   same as -F FILE
      --volno-file=FILE          use/update the volume number in FILE

Device blocking:
  -b, --blocking-factor=BLOCKS   BLOCKS x 512 bytes per record
      --record-size=SIZE         SIZE bytes per record, multiple of 512
  -i, --ignore-zeros             ignore zeroed blocks in archive (means EOF)
  -B, --read-full-records        reblock as we read (for 4.2BSD pipes)

Archive format selection:
  -V, --label=NAME                   create archive with volume name NAME
              PATTERN                at list/extract time, a globbing PATTERN
  -o, --old-archive, --portability   write a V7 format archive
      --posix                        write a POSIX format archive
  -j, --bzip2                        filter the archive through bzip2
  -z, --gzip, --ungzip               filter the archive through gzip
  -Z, --compress, --uncompress       filter the archive through compress
      --use-compress-program=PROG    filter through PROG (must accept -d)

Local file selection:
  -C, --directory=DIR          change to directory DIR
  -T, --files-from=NAME        get names to extract or create from file NAME
      --null                   -T reads null-terminated names, disable -C
      --exclude=PATTERN        exclude files, given as a PATTERN
  -X, --exclude-from=FILE      exclude patterns listed in FILE
      --anchored               exclude patterns match file name start (default)
      --no-anchored            exclude patterns match after any /
      --ignore-case            exclusion ignores case
      --no-ignore-case         exclusion is case sensitive (default)
      --wildcards              exclude patterns use wildcards (default)
      --no-wildcards           exclude patterns are plain strings
      --wildcards-match-slash  exclude pattern wildcards match '/' (default)
      --no-wildcards-match-slash exclude pattern wildcards do not match '/'
  -P, --absolute-names         don't strip leading `/'s from file names
  -h, --dereference            dump instead the files symlinks point to
      --no-recursion           avoid descending automatically in directories
  -l, --one-file-system        stay in local file system when creating archive
  -K, --starting-file=NAME     begin at file NAME in the archive
  -N, --newer=DATE             only store files newer than DATE
      --newer-mtime=DATE       compare date and time when data changed only
      --after-date=DATE        same as -N
      --backup[=CONTROL]       backup before removal, choose version control
      --suffix=SUFFIX          backup before removal, override usual suffix

Informative output:
      --help            print this help, then exit
      --version         print tar program version number, then exit
  -v, --verbose         verbosely list files processed
      --checkpoint      print directory names while reading the archive
      --totals          print total bytes written while creating archive
  -R, --block-number    show block number within archive with each message
  -w, --interactive     ask for confirmation for every action
      --confirmation    same as -w

The backup suffix is `~', unless set with --suffix or SIMPLE_BACKUP_SUFFIX.
The version control may be set with --backup or VERSION_CONTROL, values are:

  t, numbered     make numbered backups
  nil, existing   numbered if numbered backups exist, simple otherwise
  never, simple   always make simple backups

GNU tar cannot read nor produce `--posix' archives.  If POSIXLY_CORRECT
is set in the environment, GNU extensions are disallowed with `--posix'.
Support for POSIX is only partially implemented, don't count on it yet.
ARCHIVE may be FILE, HOST:FILE or USER@HOST:FILE; DATE may be a textual date
or a file name starting with `/' or `.', in which case the file's date is used.
*This* `tar' defaults to `-f- -b20'.

Report bugs to <bug-tar@gnu.org>.


#include <stdio.h>
#include <string.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <netdb.h>

main(int argc, const char *argv[]) {
u_long addr;
struct hostent *hp;
char **p;

if(argc !=2){
printf("uso: %s dirección-IP\n", argv[0]);
exit(1);
}

if((addr =inet_addr(argv[1]))==-1){
printf("La dirección IP tiene que estar en notación de punto: a.b.c.d \n");
exit(2);
}
hp = gethostbyaddr((char *)&addr, sizeof (addr), AF_INET);
if(hp==NULL){
printf("No encuentro información sobre la maquina %s\n", argv[1]);
exit(3);
}

for(p=hp->h_addr_list; *p != 0; p++){
struct in_addr in;
memcpy(&in.s_addr, *p, sizeof (in.s_addr));
printf("%s\t%s\n", inet_ntoa(in), hp->h_name);
}
exit(0);
}


************

C     Last change:  EES  26 Jun 2003    4:09 pm
program montecarlo1

integer seed

data seed/987654321/
data exact/.78540/

end program
***************

c*-*
c*-* Copyright (C) 2000 Massimo Marchi and Piero Procacci
c*-* Full copyright notice at http://www.chim.unifi.it/orac/copyright4.0.html
c*-* Contact for info M. Marchi, CEA,  Gif Sur Yvette 91191 (FRANCE) 
c*-* Email:marchi@villon.saclay.cea.fr
c*-* 
      subroutine pmesh_kspace_get_sizes(
     $     nfft1,nfft2,nfft3,numatoms,order,
     $     sizfftab,sizffwrk,siztheta,siz_Q,sizheap,sizstack)
      implicit none
      integer nfft1,nfft2,nfft3,numatoms,order,
     $     sizfftab,sizffwrk,siztheta,siz_Q,sizheap,sizstack

c INPUT  
c      nfft1,nfft2,nfft3,numatoms,order
c      nfft1,nfft2,nfft3 are the dimensions of the charge grid array
c      numatoms is number of atoms
c      order is the order of B-spline interpolation

c OUTPUT
c      sizfftab,sizffwrk,siztheta,siz_Q
c      sizfftab is permanent 3d fft table storage
c      sizffwrk is temporary 3d fft work storage
c      siztheta is size of arrays theta1-3 dtheta1-3
c      sizheap is total size of permanent storage
c      sizstack is total size of temporary storage


c This routine computes the above output parameters needed for 
c heap or stack allocation.

      integer nfftdim1,nfftdim2,nfftdim3,nfftable,nffwork

      call get_fftdims(nfft1,nfft2,nfft3,
     $       nfftdim1,nfftdim2,nfftdim3,nfftable,nffwork,
     $       sizfftab,sizffwrk)
      siztheta = numatoms*order
      siz_Q = 2*nfftdim1*nfftdim2*nfftdim3
      sizheap = nfft1+nfft2+nfft3+sizfftab
      sizstack = siz_Q+6*siztheta+sizffwrk+3*numatoms
C      write(6,*)'total HEAP storage needed = ',sizheap
C      write(6,*)'total STACK storage needed = ',sizstack
      return
      end
c----------------------------------------------------
      subroutine pmesh_kspace_setup(
     $    bsp_mod1,bsp_mod2,bsp_mod3,fftable,ffwork,
     $    nfft1,nfft2,nfft3,order,sizfftab,sizffwrk)
      implicit none

c  see DO_PMESH_KSPACE for explanation of arguments

      integer nfft1,nfft2,nfft3,order,sizfftab,sizffwrk
      double precision bsp_mod1(nfft1),bsp_mod2(nfft2),
     +   bsp_mod3(nfft3)
      double precision fftable(sizfftab),ffwork(sizffwrk)
   
      double precision dummy
      integer nfftdim1,nfftdim2,nfftdim3,nfftable,nffwork,sfft,sffw

      call get_fftdims(nfft1,nfft2,nfft3,
     $       nfftdim1,nfftdim2,nfftdim3,nfftable,nffwork,sfft,sffw)
      call load_bsp_moduli(bsp_mod1,bsp_mod2,bsp_mod3,
     $   nfft1,nfft2,nfft3,order)
      call fft_setup(dummy,fftable,ffwork,
     $      nfft1,nfft2,nfft3,nfftdim1,nfftdim2,nfftdim3,
     $      nfftable,nffwork)
      return
      end
c----------------------------------------------------
      subroutine do_pmesh_kspace(
     $   numatoms,x,y,z,charge,recip,volume,ewald_coeff,
     $   order,nfft1,nfft2,nfft3,
     $   eer,dx,dy,dz,virial,
     $   sizfftab,sizffwrk,siztheta,siz_Q,
     $   bsp_mod1,bsp_mod2,bsp_mod3,fftable,
     $   Q,ffwork,theta1,theta2,theta3,dtheta1,dtheta2,dtheta3,
     $   fr1,fr2,fr3,rkcut)
      implicit none

c INPUT 
c       numatoms:  number of atoms
c       x,y,z:   atomic coords
c       charge  atomic charges
c       recip: 3x3 array of reciprocal unit cell vectors (stored as columns)
c       volume: the volume of the unit cell
c       ewald_coeff:   ewald convergence parameter
c       order: the order of Bspline interpolation. E.g. cubic is order 4
c          fifth degree is order 6 etc. The order must be an even number 
c          and at least 4.
c       nfft1,nfft2,nfft3: the dimensions of the charge grid array
      integer numatoms,order,nfft1,nfft2,nfft3
      double precision x(numatoms),y(numatoms),z(numatoms),
     $       charge(numatoms),recip(3,3),volume,ewald_coeff,rkcut

c OUTPUT
c       eer:  ewald reciprocal or k-space  energy
c       dx,dy,dz: forces incremented by k-space sum
c       virial:  virial due to k-space sum (valid for atomic scaling;
c                rigid molecule virial needs a correction term not
c                computed here
      double precision eer,dx(numatoms),dy(numatoms),dz(numatoms),
     $        virial(3,3)

c SIZES of some arrays
      integer   sizfftab,sizffwrk,siztheta,siz_Q


c HEAP STORAGE:  These arrays need to be preserved throughout simulation
      double precision bsp_mod1(nfft1),bsp_mod2(nfft2),
     $                 bsp_mod3(nfft3),fftable(sizfftab)
c STACK STORAGE: These arrays can be tossed after leaving this routine
      double precision Q(siz_Q),ffwork(sizffwrk),theta1(siztheta),
     $          theta2(siztheta),theta3(siztheta),dtheta1(siztheta),
     $          dtheta2(siztheta),dtheta3(siztheta),fr1(numatoms),
     $          fr2(numatoms),fr3(numatoms)

      integer nfftdim1,nfftdim2,nfftdim3,nfftable,nffwork,sfft,sffw
c  get some integer array dimensions
      call get_fftdims(nfft1,nfft2,nfft3,
     $       nfftdim1,nfftdim2,nfftdim3,nfftable,nffwork,sfft,sffw)
      
      call get_scaled_fractionals(
     $         numatoms,x,y,z,recip,nfft1,nfft2,nfft3,fr1,fr2,fr3)
      call get_bspline_coeffs(
     $         numatoms,fr1,fr2,fr3,order,
     $         theta1,theta2,theta3,dtheta1,dtheta2,dtheta3)
      call fill_charge_grid(
     $         numatoms,charge,theta1,theta2,theta3,fr1,fr2,fr3,order,
     $         nfft1,nfft2,nfft3,nfftdim1,nfftdim2,nfftdim3,Q)
      call fft_back(
     $         Q,fftable,ffwork,nfft1,nfft2,nfft3,
     $         nfftdim1,nfftdim2,nfftdim3,nfftable,nffwork)
      call scalar_sum(
     $         Q,ewald_coeff,volume,recip,bsp_mod1,bsp_mod2,bsp_mod3,
     $     nfft1,nfft2,nfft3,nfftdim1,nfftdim2,nfftdim3,eer,virial,rkcut
     &     )
      call fft_forward(
     $         Q,fftable,ffwork,nfft1,nfft2,nfft3,
     $         nfftdim1,nfftdim2,nfftdim3,nfftable,nffwork)
      call grad_sum(
     $         numatoms,charge,recip,theta1,theta2,theta3,
     $         dtheta1,dtheta2,dtheta3,dx,dy,dz,fr1,fr2,fr3,
     $         order,nfft1,nfft2,nfft3,nfftdim1,nfftdim2,nfftdim3,Q)
      return
      end
c----------------------------------------------------------------------
      subroutine get_scaled_fractionals(
     $           numatoms,x,y,z,recip,nfft1,nfft2,nfft3,
     $           fr1,fr2,fr3)
      implicit none

c INPUT:
c      numatoms: number of atoms
c      x,y,z: arrays of cartesian coords
c      recip: the 3x3 array of reciprocal vectors stored as columns
c OUTPUT:
c     fr1,fr2,fr3 the scaled and shifted fractional coords

      integer numatoms,nfft1,nfft2,nfft3
      double precision x(numatoms),y(numatoms),z(numatoms),recip(3,3)
      double precision fr1(numatoms),fr2(numatoms),fr3(numatoms)

      integer n
      double precision w
      do 100 n = 1,numatoms
        w = x(n)*recip(1,1)+y(n)*recip(2,1)+z(n)*recip(3,1)
        fr1(n) = nfft1*(w - anint(w) + 0.5d0)
        w = x(n)*recip(1,2)+y(n)*recip(2,2)+z(n)*recip(3,2)
        fr2(n) = nfft2*(w - anint(w) + 0.5d0)
        w = x(n)*recip(1,3)+y(n)*recip(2,3)+z(n)*recip(3,3)
        fr3(n) = nfft3*(w - anint(w) + 0.5d0)
100   continue
      return
      end
c---------------------------------------------------------------
      subroutine load_bsp_moduli(bsp_mod1,bsp_mod2,bsp_mod3,
     $   nfft1,nfft2,nfft3,order)
      implicit none
      integer nfft1,nfft2,nfft3,order
      double precision bsp_mod1(nfft1),bsp_mod2(nfft2),
     +   bsp_mod3(nfft3)

      integer MAXORDER
      parameter (MAXORDER=25)
      integer MAXNFFT
      parameter (MAXNFFT=1000)
      double precision array(MAXORDER),darray(MAXORDER),w
      double precision bsp_arr(MAXNFFT)
      integer i,maxn

c this routine loads the moduli of the inverse DFT of the B splines
c bsp_mod1-3 hold these values, nfft1-3 are the grid dimensions,
c Order is the order of the B spline approx.

      if ( order .gt. MAXORDER )then
       write(6,*)'order too large! check on MAXORDER'
       stop
      endif
      maxn = max(nfft1,nfft2,nfft3)
      if ( maxn .gt. MAXNFFT )then 
       write(6,*)'nfft1-3 too large! check on MAXNFFT'
       stop
      endif
      w = 0.d0
      call fill_bspline(w,order,array,darray)
      do 100 i = 1,maxn
        bsp_arr(i) = 0.d0
100   continue
      do 150 i = 2,order+1
       bsp_arr(i) = array(i-1)
150   continue
      call DFTMOD(bsp_mod1,bsp_arr,nfft1)
      call DFTMOD(bsp_mod2,bsp_arr,nfft2)
      call DFTMOD(bsp_mod3,bsp_arr,nfft3)
      return
      end
c------------------------------------------------------------------------
      subroutine DFTMOD(bsp_mod,bsp_arr,nfft)
      implicit none
      integer nfft
      double precision bsp_mod(nfft),bsp_arr(nfft)
c Computes the modulus of the discrete fourier transform of bsp_arr,
c  storing it into bsp_mod

      integer j,k
      double precision sum1,sum2,twopi,arg,tiny
      twopi = 2.d0*3.14159265358979323846
      tiny = 1.d-7
      do 300 k = 1,nfft
       sum1 = 0.d0
       sum2 = 0.d0
       do 250 j = 1,nfft
         arg = twopi*(k-1)*(j-1)/nfft
         sum1 = sum1 + bsp_arr(j)*dcos(arg)
         sum2 = sum2 + bsp_arr(j)*dsin(arg)
250    continue
       bsp_mod(k) = sum1**2 + sum2**2
300   continue
      do 400 k = 1,nfft
       if ( bsp_mod(k) .lt. tiny )
     $     bsp_mod(k) = 0.5d0*(bsp_mod(k-1) + bsp_mod(k+1))
400   continue
      return
      end
c------------------------------------------------------------------------


      subroutine fill_charge_grid(
     $         numatoms,charge,theta1,theta2,theta3,fr1,fr2,fr3,
     $         order,nfft1,nfft2,nfft3,nfftdim1,nfftdim2,nfftdim3,Q)
c---------------------------------------------------------------------
c INPUT:
c      numatoms:  number of atoms
c      charge: the array of atomic charges
c      theta1,theta2,theta3: the spline coeff arrays
c      fr1,fr2,fr3 the scaled and shifted fractional coords
c      nfft1,nfft2,nfft3: the charge grid dimensions
c      nfftdim1,nfftdim2,nfftdim3: physical charge grid dims
c      order: the order of spline interpolation
c OUTPUT:
c      Q the charge grid
c---------------------------------------------------------------------
      implicit none
      integer numatoms,order,nfft1,nfft2,nfft3
      integer nfftdim1,nfftdim2,nfftdim3
      double precision fr1(numatoms),fr2(numatoms),fr3(numatoms)
      double precision theta1(order,numatoms),theta2(order,numatoms),
     $     theta3(order,numatoms),charge(numatoms)
      double precision Q(2,nfftdim1,nfftdim2,nfftdim3)

      integer n,ntot,ith1,ith2,ith3,i0,j0,k0,i,j,k
      double precision prod
      ntot = 2*nfftdim1*nfftdim2*nfftdim3
      call clearQ(Q,ntot)

      do 300 n = 1,numatoms
        k0 = int(fr3(n)) - order
        do 200 ith3 = 1,order
         k0 = k0 + 1
         k = k0 + 1 + (nfft3 - isign(nfft3,k0))/2
         j0 = int(fr2(n)) - order
         do 150 ith2 = 1,order
          j0 = j0 + 1
          j = j0 + 1 + (nfft2 - isign(nfft2,j0))/2
          prod = theta2(ith2,n)*theta3(ith3,n)*charge(n)
          i0 = int(fr1(n)) - order
          do 100 ith1 = 1,order
           i0 = i0 + 1
           i = i0 + 1 + (nfft1 - isign(nfft1,i0))/2
           Q(1,i,j,k) = Q(1,i,j,k) + theta1(ith1,n) * prod
100       continue
150      continue
200     continue
300   continue
      return
      end
c-----------------------------------------------------------
      subroutine clearQ(Q,ntot)
      integer ntot
      double precision Q(ntot)
      integer i
      do 10 i = 1,ntot
        Q(i) = 0.d0
10    continue
      return
      end
c-----------------------------------------------------------
      subroutine grad_sum(
     $         numatoms,charge,recip,theta1,theta2,theta3,
     $         dtheta1,dtheta2,dtheta3,fx,fy,fz,fr1,fr2,fr3,
     $         order,nfft1,nfft2,nfft3,nfftdim1,nfftdim2,nfftdim3,Q)
      implicit none
      integer numatoms,order,nfft1,nfft2,nfft3
      integer nfftdim1,nfftdim2,nfftdim3
      double precision recip(3,3)
      double precision fr1(numatoms),fr2(numatoms),fr3(numatoms)
      double precision fx(numatoms),fy(numatoms),fz(numatoms)
      double precision theta1(order,numatoms),theta2(order,numatoms),
     $     theta3(order,numatoms),charge(numatoms)
      double precision dtheta1(order,numatoms),dtheta2(order,numatoms),
     $     dtheta3(order,numatoms)
      double precision Q(2,nfftdim1,nfftdim2,nfftdim3)

      integer n,ith1,ith2,ith3,i0,j0,k0,i,j,k
      double precision f1,f2,f3,term

C$DOACROSS LOCAL(f1,f2,f3,k0,k,j0,j,i0,i,term,n,ith1,ith2,ith3),
C$&  SHARE(numatoms,fr1,fr2,fr3,charge,Q,fx,fy,fz,recip,order,
C$&   nfft1,nfft2,nfft3,theta1,theta2,theta3,dtheta1,dtheta2,dtheta3)
      do 400 n = 1,numatoms
        f1 = 0.d0
        f2 = 0.d0
        f3 = 0.d0
        k0 = int(fr3(n)) - order
        do 200 ith3 = 1,order
         k0 = k0 + 1
         k = k0 + 1 + (nfft3 - isign(nfft3,k0))/2
         j0 = int(fr2(n)) - order
         do 150 ith2 = 1,order
          j0 = j0 + 1
          j = j0 + 1 + (nfft2 - isign(nfft2,j0))/2
          i0 = int(fr1(n)) - order
          do 100 ith1 = 1,order
           i0 = i0 + 1
           i = i0 + 1 + (nfft1 - isign(nfft1,i0))/2
           term = charge(n)*Q(1,i,j,k)
c force is negative of grad
           f1 = f1 - nfft1 * term * dtheta1(ith1,n) *
     $          theta2(ith2,n) * theta3(ith3,n)
           f2 = f2 - nfft2 * term * theta1(ith1,n) *
     $          dtheta2(ith2,n) * theta3(ith3,n)
           f3 = f3 - nfft3 * term * theta1(ith1,n) *
     $          theta2(ith2,n) * dtheta3(ith3,n)
100       continue
150      continue
200     continue
        fx(n) = fx(n) + recip(1,1)*f1+recip(1,2)*f2+recip(1,3)*f3
        fy(n) = fy(n) + recip(2,1)*f1+recip(2,2)*f2+recip(2,3)*f3
        fz(n) = fz(n) + recip(3,1)*f1+recip(3,2)*f2+recip(3,3)*f3
400   continue
      return
      end

c-------------------------------------------------------------
      subroutine check_virial(self_ene,adj_ene,dir_ene,rec_ene,
     $       adj_vir,rec_vir,dir_vir)
      implicit none
      double precision self_ene,adj_ene,dir_ene,rec_ene
      double precision adj_vir(6),rec_vir(6),dir_vir(6)

      double precision etot,svir,relerr
      etot = self_ene+adj_ene+dir_ene+rec_ene
      svir = adj_vir(1)+rec_vir(1)+dir_vir(1)+
     $       adj_vir(4)+rec_vir(4)+dir_vir(4)+
     $       adj_vir(6)+rec_vir(6)+dir_vir(6)
      relerr = 2.d0*abs(etot+svir)/(abs(etot)+abs(svir))
      write(6,*)'tot ene =   ',etot
      write(6,*)'trace vir = ',svir
      write(6,*)'rel error = ',relerr
      return
      end
c-------------------------------------------------------------
      subroutine check_force(numatoms,
     $      fx1,fy1,fz1,fx2,fy2,fz2,fdx,fdy,fdz)
      integer numatoms
      double precision fx1(*),fy1(*),fz1(*),fx2(*),fy2(*),fz2(*),
     $      fdx(*),fdy(*),fdz(*)

      double precision rms_num,rms_den,rms
      integer i
      rms_num = 0.d0
      rms_den = 0.d0
      do 100 i = 1,numatoms
       rms_num = rms_num + (fx1(i)-fx2(i))**2 + (fy1(i)-fy2(i))**2 +
     $          (fz1(i)-fz2(i))**2
       rms_den = rms_den + fdx(i)**2 + fdy(i)**2 + fdz(i)**2
100   continue
      rms = dsqrt(rms_num/rms_den)
      write(6,*)'rms force err = ',rms
      return
      end
c-------------------------------------------------------------

      subroutine pubz3di(n1,n2,n3,table,ntable)
      implicit none
      integer n1,n2,n3,ntable
      double precision table(ntable,3)
c ntable should be 4*max(n1,n2,n3) +15


      call cffti(n1,table(1,1))
      call cffti(n2,table(1,2))
      call cffti(n3,table(1,3))

      return
      end
*****************************************************************************
      subroutine pubz3d(isign,n1,n2,n3,w,ld1,ld2,table,ntable,
     $    work,nwork)
      implicit none

      integer n1,n2,n3,ld1,ld2,isign,ntable,nwork
      double complex w(ld1,ld2,n3)
      double complex work( nwork)
      double precision table(ntable,3)

      integer i,j,k
c ntable should be 4*max(n1,n2,n3) +15
c nwork should be max(n1,n2,n3)
c
c   transform along X  first ...
c
      do 100 k = 1, n3
       do 90 j = 1, n2
        do 70 i = 1,n1
          work(i) = w(i,j,k)
70      continue
        if ( isign .eq. -1) call cfftf(n1,work,table(1,1))
        if ( isign .eq. 1) call cfftb(n1,work,table(1,1))
        do 80 i = 1,n1
          w(i,j,k) = work(i)
80      continue
90     continue
100   continue
c
c   transform along Y then ...
c
      do 200 k = 1,n3
       do 190 i = 1,n1
        do 170 j = 1,n2
          work(j) = w(i,j,k)
170     continue
        if ( isign .eq. -1) call cfftf(n2,work,table(1,2))
        if ( isign .eq. 1) call cfftb(n2,work,table(1,2))
        do 180 j = 1,n2
          w(i,j,k) = work(j)
180     continue
190    continue
200   continue
c
c   transform along Z finally ...
c
      do 300 i = 1, n1
       do 290 j = 1, n2
        do 270 k = 1,n3
          work(k) = w(i,j,k)
270     continue
        if ( isign .eq. -1) call cfftf(n3,work,table(1,3))
        if ( isign .eq. 1) call cfftb(n3,work,table(1,3))
        do 280 k = 1,n3
          w(i,j,k) = work(k)
280     continue
290    continue
300   continue

      return
      end
c----------------------------------------------------


C SPLINE

c---------------------------------------------------------------------
      subroutine get_bspline_coeffs(
     $           numatoms,fr1,fr2,fr3,order,
     $           theta1,theta2,theta3,dtheta1,dtheta2,dtheta3)
c---------------------------------------------------------------------
c INPUT:
c      numatoms: number of atoms
c      fr1,fr2,fr3 the scaled and shifted fractional coords
c      order: the order of spline interpolation
c OUTPUT
c      theta1,theta2,theta3: the spline coeff arrays
c      dtheta1,dtheta2,dtheta3: the 1st deriv of spline coeff arrays
c---------------------------------------------------------------------
      implicit none
      integer numatoms,order
      double precision fr1(numatoms),fr2(numatoms),fr3(numatoms)
      double precision theta1(order,numatoms),theta2(order,numatoms),
     $     theta3(order,numatoms),dtheta1(order,numatoms),
     $     dtheta2(order,numatoms),dtheta3(order,numatoms)

      double precision w
      integer n

      do 100 n = 1,numatoms
        w = fr1(n)-int(fr1(n))
        call fill_bspline(w,order,theta1(1,n),dtheta1(1,n))
        w = fr2(n)-int(fr2(n))
        call fill_bspline(w,order,theta2(1,n),dtheta2(1,n))
        w = fr3(n)-int(fr3(n))
        call fill_bspline(w,order,theta3(1,n),dtheta3(1,n))
100   continue
      return
      end
c---------------------------------------------------
      subroutine fill_bspline(w,order,array,darray)
c---------- use standard B-spline recursions: see doc file
      implicit none
      integer order
      double precision w,array(order),darray(order)

      integer k
c do linear case
      call init(array,w,order)
c compute standard b-spline recursion
      do 10 k = 3,order-1
       call one_pass(array,w,k)
10    continue
c perform standard b-spline differentiation
      call diff(array,darray,order)
c one more recursion
      call one_pass(array,w,order)
      return
      end
c---------------------------------------------------
      subroutine init(c,x,order)
      implicit none
      integer order
      double precision c(order),x
      c(order) = 0.d0
      c(2) = x
      c(1) = 1.d0 - x
      return
      end
c-------------------------------------
      subroutine one_pass(c,x,k)
      implicit none
      double precision c(*),x
      integer k

      double precision div
      integer j

      div = 1.d0 / (k-1)
      c(k) = div*x*c(k-1)
      do 100 j = 1,k-2
       c(k-j) = div*((x+j)*c(k-j-1) + (k-j-x)*c(k-j))
100   continue
      c(1) = div*(1-x)*c(1)
      return
      end
c-------------------------------------
      subroutine diff(c,d,order)
      implicit none
      double precision c(*),d(*)
      integer order

      integer j
      d(1) = -c(1)
      do 10 j = 2,order
       d(j) = c(j-1) - c(j)
10    continue
      return
      end
c-------------------------------------


C   FFT CALLS

      subroutine get_fftdims(nfft1,nfft2,nfft3,
     $       nfftdim1,nfftdim2,nfftdim3,nfftable,nffwork,
     $       sizfftab,sizffwrk)
      implicit none
      integer nfft1,nfft2,nfft3,nfftdim1,nfftdim2,nfftdim3,
     $       nfftable,nffwork,sizfftab,sizffwrk
      integer n,nfftmax

      nfftmax = max(nfft1,nfft2,nfft3)
      nfftdim1 = nfft1
      n = nfft1/2
      if ( nfft1 .eq. 2*n )nfftdim1 = nfft1+1
      nfftdim2 = nfft2
      n = nfft2/2
      if ( nfft2 .eq. 2*n )nfftdim2 = nfft2+1
      nfftdim3 = nfft3
      n = nfft3/2
      if ( nfft3 .eq. 2*n )nfftdim3 = nfft3+1
#ifdef SGIFFT
      nfftable = 2*(nfftdim1+nfftdim2+nfftdim3+50)
      nffwork = 0
      sizfftab = nfftable
      sizffwrk  = nffwork
#endif
#ifdef CRAY
      nfftable = 2*(nfftdim1+nfftdim2+nfftdim3+50)
      nffwork = 4*nfftdim1*nfftdim2*nfftdim3
      sizfftab = nfftable
      sizffwrk  = nffwork
#else
      nfftable = 4*nfftmax + 15
      nffwork = nfftmax
      sizfftab = 3*nfftable
      sizffwrk  = 2*nfftmax
#endif
      return
      end

      subroutine fft_setup(array,fftable,ffwork,
     $      nfft1,nfft2,nfft3,nfftdim1,nfftdim2,nfftdim3,
     $      nfftable,nffwork)
      implicit none

      double precision array(*),fftable(*),ffwork(*)
      integer nfft1,nfft2,nfft3,nfftdim1,nfftdim2,nfftdim3
      integer nfftable,nffwork,isys(4)

      integer isign,inc1,inc2,inc3
      double precision scale

#ifdef SGIFFT
      call ZFFT3DI(nfft1,nfft2,nfft3,fftable)
#endif
#ifdef CRAY
      write(6,*)'using cray fft code'
      isign = 0
      scale = 1.d0
      isys(1)=3
      isys(2)=0
      isys(3)=0
      isys(4)=0
      call CCFFT3D(isign,nfft1,nfft2,nfft3,scale,array,
     $      nfftdim1,nfftdim2,array,nfftdim1,nfftdim2,fftable,
     $      ffwork,isys)
#else
      write(6,*)'using public domain fft code'
      call pubz3di(nfft1,nfft2,nfft3,fftable,nfftable)
#endif
      return
      end
c-----------------------------------------------------------
      subroutine fft_forward(array,fftable,ffwork,
     $      nfft1,nfft2,nfft3,nfftdim1,nfftdim2,nfftdim3,
     $      nfftable,nffwork)
      implicit none

      double precision array(*),fftable(*),ffwork(*)
      integer nfft1,nfft2,nfft3,nfftdim1,nfftdim2,nfftdim3

      integer isign,inc1,inc2,inc3
      double precision scale
      integer nfftable,nffwork,isys(4)

      isign = 1

#ifdef SGIFFT
      call ZFFT3D(isign,nfft1,nfft2,nfft3,array,
     $   nfftdim1,nfftdim2,fftable)
#endif
#ifdef CRAY
      scale = 1.d0
      isys(1)=3
      isys(2)=0
      isys(3)=0
      isys(4)=0
      call CCFFT3D(isign,nfft1,nfft2,nfft3,scale,array,
     $      nfftdim1,nfftdim2,array,nfftdim1,nfftdim2,fftable,
     $      ffwork,isys)
#else
      call pubz3d(isign,nfft1,nfft2,nfft3,array,
     $   nfftdim1,nfftdim2,fftable,nfftable,ffwork,nffwork)
#endif
      return
      end
c-----------------------------------------------------------
      subroutine fft_back(array,fftable,ffwork,
     $      nfft1,nfft2,nfft3,nfftdim1,nfftdim2,nfftdim3,
     $      nfftable,nffwork)
      implicit none

      double precision array(*),fftable(*),ffwork(*)
      integer nfft1,nfft2,nfft3,nfftdim1,nfftdim2,nfftdim3
      integer nfftable,nffwork,isys(4)

      integer isign,inc1,inc2,inc3
      double precision scale

      isign = -1

#ifdef SGIFFT
      call ZFFT3D(isign,nfft1,nfft2,nfft3,array,
     $   nfftdim1,nfftdim2,fftable)
#endif
#ifdef CRAY
      scale = 1.d0
      isys(1)=3
      isys(2)=0
      isys(3)=0
      isys(4)=0
      call CCFFT3D(isign,nfft1,nfft2,nfft3,scale,array,
     $      nfftdim1,nfftdim2,array,nfftdim1,nfftdim2,fftable,
     $      ffwork,isys)
#else
      call pubz3d(isign,nfft1,nfft2,nfft3,array,
     $   nfftdim1,nfftdim2,fftable,nfftable,ffwork,nffwork)
#endif
      return
      end
************
[roberto@nautilus tools]$ rpm
   RPM version 4.0.4
   Copyright (C) 1998-2000 - Red Hat, Inc.
   This program may be freely redistributed under the terms of the GNU GPL

Usage: rpm {--help}
rpm {--version}
[roberto@nautilus tools]$ rpm nmap*.rpm
   RPM version 4.0.4
   Copyright (C) 1998-2000 - Red Hat, Inc.
   This program may be freely redistributed under the terms of the GNU GPL

Usage: rpm {--help}
rpm {--version}
[roberto@nautilus tools]$ rpm --help
Usage: rpm [OPTION...]

   Query options (with -q or --query):
   -c, --configfiles                list all configuration files
   -d, --docfiles                   list all documentation files
   --dump                           dump basic file information
   -l, --list                       list files in package
   --queryformat=QUERYFORMAT        use the following query format
-s, --state                      display the states of the listed files
-v, --verbose                    display a verbose file listing
-a, --all                        query/verify all packages
-f, --file                       query/verify package(s) owning file
-g, --group                      query/verify package(s) in group
-p, --package                    query/verify a package file (i.e. a binary
*.rpm file)
--querytags                      display known query tags
--specfile                       query a spec file
--whatrequires                   query/verify the package(s) which require a
dependency
--whatprovides                   query/verify the package(s) which provide a
dependency

Verify options (with -V or --verify):
--nomd5[|=0x1]                   don't verify MD5 digest of files
   --nofiles[|=0x10000]             don't verify files in package
   --nodeps[|=0x20000]              don't verify package dependencies
   --noscript[|=0x40000]            don't execute %verifyscript (if any)
   -a, --all                        query/verify all packages
   -f, --file                       query/verify package(s) owning file
   -g, --group                      query/verify package(s) in group
   -p, --package                    query/verify a package file (i.e. a binary
*.rpm file)
   --querytags                      display known query tags
   --specfile                       query a spec file
   --whatrequires                   query/verify the package(s) which require a
   dependency
   --whatprovides                   query/verify the package(s) which provide a
   dependency

   Signature options:
   --addsign                        add a signature to a package
   --resign                         sign a package (discard current signature)
   -K, --checksig                   verify package signature
   --nogpg[&=~0x4]                  skip any GPG signatures
--nomd5[&=~0x2]                  do not verify file md5 checksums

  Database options:
  --initdb                         initialize database
  --rebuilddb                      rebuild database inverted lists from
  installed package headers

  Install/Upgrade/Erase options:
  --allfiles[|=0x40]               install all files, even configurations
which might otherwise be skipped
--allmatches[|=0x2]              remove all packages which match <package>
(normally an error is generated if
<package> specified multiple packages)
--badreloc[|=0x8]                relocate files in non-relocateable package
-e, --erase=<package>+           erase (uninstall) package
--excludedocs[|=0x20]            do not install documentation
--excludepath=<path>             skip files with leading component <path>
--force[|=0x74]                  short hand for --replacepkgs --replacefiles
 -F, --freshen=<packagefile>+     upgrade package(s) if already installed
-h, --hash[|=0x2]                print hash marks as package installs (good
with -v)
--ignorearch[|=0x2]              don't verify package architecture
   --ignoreos[|=0x1]                don't verify package operating system
   --ignoresize[|=0x180]            don't check disk space before installing
   --includedocs                    install documentation
   --install=<packagefile>+         install package
--justdb[|=0x8]                  update the database, but do not modify the
filesystem
--nodeps                         do not verify package dependencies
--noorder[|=0x8]                 do not reorder package installation to
satisfy dependencies
--noscripts[|=0xff0000]          do not execute package scriptlet(s)
--notriggers[|=0x990000]         do not execute any scriptlet(s) triggered
  by this package
  --oldpackage[|=0x40]             upgrade to an old version of the package
 (--force on upgrades does this
  automatically)
 --percent[|=0x1]                 print percentages as package installs
 --prefix=<dir>                   relocate the package to <dir>, if
relocatable
--relocate=<old>=<new>           relocate files from path <old> to <new>
  --repackage[|=0x400]             save erased package files by repackaging
--replacefiles[|=0x30]           install even if the package replaces
 installed files
 --replacepkgs[|=0x4]             reinstall if the package is already present
--test[|=0x1]                    don't install, but tell if it would work or
   not
   -U, --upgrade=<packagefile>+     upgrade package(s)

Common options for all rpm modes:
--version                        print the version of rpm being used
--quiet                          provide less detailed output
-v, --verbose                    provide more detailed output
--define='<name> <body>'         define macro <name> with value <body>
 --eval=<expr>+                   print macro expansion of <expr>+
-r, --root=<dir>                 use <dir> as the top level directory
(default: "/")
--macros=<file:...>              read <file:...> instead of default macro
file(s)
--rcfile=<file:...>              read <file:...> instead of default rpmrc
file(s)
--showrc                         display final rpmrc and macro configuration

Options implemented via popt alias/exec:
--scripts                        list install/erase scriptlets from
package(s)
--setperms                       set permissions of files in a package
--setugids                       set user/group ownership of files in a
package
--conflicts                      list capabilities this package conflicts
with
--obsoletes                      list other packages removed by installing
this package
--provides                       list capabilities that this package provides
--requires                       list capabilities required by package(s)
--info                           list descriptive information from package(s)
--changelog                      list change logs for this package
--triggers                       list trigger scriptlets from package(s)
--last                           list package(s) by install time, most
recent first
--filesbypkg                     list all files from each package
--redhatprovides                 find package name that contains a provided
capability (needs rpmdb-redhat package
installed)
--redhatrequires                 find package name that contains a required
capability (needs rpmdb-redhat package
installed)
--buildpolicy=<policy>           set buildroot <policy> (e.g. compress man
  pages)
  --with=<option>                  enable configure <option> for build
 --without=<option>               disable configure <option> for build

Help options:
-?, --help                       Show this help message
--usage                          Display brief usage message


unexpected token `file)'
[roberto@nautilus tools]$   --querytags                      display known query tags
bash: --querytags: command not found
[roberto@nautilus tools]$   --specfile                       query a spec file
bash: --specfile: command not found
[roberto@nautilus tools]$   --whatrequires                   query/verify the package(s) which require a
bash: syntax error near unexpected token `package(s'
[roberto@nautilus tools]$                                    dependency
bash: dependency: command not found
[roberto@nautilus tools]$   --whatprovides                   query/verify the package(s) which provide a
bash: syntax error near unexpected token `package(s'
[roberto@nautilus tools]$                                    dependency
bash: dependency: command not found
[roberto@nautilus tools]$
[roberto@nautilus tools]$ Signature options:
bash: Signature: command not found
[roberto@nautilus tools]$   --addsign                        add a signature to a package
bash: --addsign: command not found
[roberto@nautilus tools]$   --resign                         sign a package (discard current signature)
bash: syntax error near unexpected token `(d'
[roberto@nautilus tools]$   -K, --checksig                   verify package signature
bash: -K,: command not found
[roberto@nautilus tools]$   --nogpg[&=~0x4]                  skip any GPG signatures
bash: --nogpg[: command not found
[1] 10542
bash: =~0x4]: command not found
[1]+  Exit 127                --nogpg[
[roberto@nautilus tools]$   --nomd5[&=~0x2]                  do not verify file md5 checksums
bash: --nomd5[: command not found
[1] 10544
bash: =~0x2]: command not found
[1]   Exit 127                --nomd5[
[roberto@nautilus tools]$
[roberto@nautilus tools]$ Database options:
bash: Database: command not found
[roberto@nautilus tools]$   --initdb                         initialize database
bash: --initdb: command not found
[roberto@nautilus tools]$   --rebuilddb                      rebuild database inverted lists from
bash: --rebuilddb: command not found
[roberto@nautilus tools]$                                    installed package headers
bash: installed: command not found
[roberto@nautilus tools]$
[roberto@nautilus tools]$ Install/Upgrade/Erase options:
bash: Install/Upgrade/Erase: No such file or directory
[roberto@nautilus tools]$   --allfiles[|=0x40]               install all files, even configurations
bash: --allfiles[: command not found
bash: =0x40]: command not found
[roberto@nautilus tools]$                                    which might otherwise be skipped
/usr/bin/which: no might in (/usr/local/bin:/bin:/usr/bin:/usr/X11R6/bin:/usr/local/grace/bin/:/home/roberto/bin)
/usr/bin/which: no otherwise in (/usr/local/bin:/bin:/usr/bin:/usr/X11R6/bin:/usr/local/grace/bin/:/home/roberto/bin)
/usr/bin/which: no be in (/usr/local/bin:/bin:/usr/bin:/usr/X11R6/bin:/usr/local/grace/bin/:/home/roberto/bin)
/usr/bin/which: no skipped in (/usr/local/bin:/bin:/usr/bin:/usr/X11R6/bin:/usr/local/grace/bin/:/home/roberto/bin)
[roberto@nautilus tools]$   --allmatches[|=0x2]              remove all packages which match <package>
bash: syntax error near unexpected token `<package>'
[roberto@nautilus tools]$                                    (normally an error is generated if
>                                    <package> specified multiple packages)
bash: normally: command not found
bash: package: No such file or directory
[roberto@nautilus tools]$   --badreloc[|=0x8]                relocate files in non-relocateable package
bash: --badreloc[: command not found
bash: =0x8]: command not found
[roberto@nautilus tools]$   -e, --erase=<package>+           erase (uninstall) package
bash: syntax error near unexpected token `(u'
[roberto@nautilus tools]$   --excludedocs[|=0x20]            do not install documentation
bash: --excludedocs[: command not found
bash: =0x20]: command not found
[roberto@nautilus tools]$   --excludepath=<path>             skip files with leading component <path>
bash: syntax error near unexpected token `<path>'
[roberto@nautilus tools]$   --force[|=0x74]                  short hand for --replacepkgs --replacefiles
bash: --force[: command not found
bash: =0x74]: command not found
[roberto@nautilus tools]$   -F, --freshen=<packagefile>+     upgrade package(s) if already installed
bash: syntax error near unexpected token `package(s'
[roberto@nautilus tools]$   -h, --hash[|=0x2]                print hash marks as package installs (good
bash: syntax error near unexpected token `(g'
[roberto@nautilus tools]$     ed output
output: No such file or directory

?
[roberto@nautilus tools]$ who
roberto  pts/0    Jun 20 18:29
[roberto@nautilus tools]$ ls
dumpacl.zip             john-16w.zip    nmap-2.53-1.i386.rpm         pwdump2.zip
firewalk-0.99.1.tar.gz  lc3setup01.exe  nvx005.zip                   sid.zip
foundstone tools        Mis documentos  pandora_linux_v4.0_b2.1.tgz  thcscan.zip
icmpquery.c.txt         Mis imágenes    pan_online_95_b2.zip         whisker.zip
john-1.6.tar.gz         nessus          pan_online_nt_b2.zip
[roberto@nautilus tools]$ tar
tar: You must specify one of the `-Acdtrux' options
Try `tar --help' for more information.
[roberto@nautilus tools]$ tar --help
GNU `tar' saves many files together into a single tape or disk archive, and
can restore individual files from the archive.

Usage: tar [OPTION]... [FILE]...

Examples:
  tar -cf archive.tar foo bar  # Create archive.tar from files foo and bar.
  tar -tvf archive.tar         # List all files in archive.tar verbosely.
  tar -xf archive.tar          # Extract all files from archive.tar.

If a long option shows an argument as mandatory, then it is mandatory
for the equivalent short option also.  Similarly for optional arguments.

Main operation mode:
  -t, --list              list the contents of an archive
  -x, --extract, --get    extract files from an archive
  -c, --create            create a new archive
  -d, --diff, --compare   find differences between archive and file system
  -r, --append            append files to the end of an archive
  -u, --update            only append files newer than copy in archive
  -A, --catenate          append tar files to an archive
      --concatenate       same as -A
      --delete            delete from the archive (not on mag tapes!)

Operation modifiers:
  -W, --verify               attempt to verify the archive after writing it
      --remove-files         remove files after adding them to the archive
  -k, --keep-old-files       don't replace existing files when extracting
      --overwrite            overwrite existing files when extracting
      --overwrite-dir        overwrite directory metadata when extracting
  -U, --unlink-first         remove each file prior to extracting over it
      --recursive-unlink     empty hierarchies prior to extracting directory
  -S, --sparse               handle sparse files efficiently
  -O, --to-stdout            extract files to standard output
  -G, --incremental          handle old GNU-format incremental backup
  -g, --listed-incremental=FILE
                             handle new GNU-format incremental backup
      --ignore-failed-read   do not exit with nonzero on unreadable files

Handling of file attributes:
      --owner=NAME             force NAME as owner for added files
      --group=NAME             force NAME as group for added files
      --mode=CHANGES           force (symbolic) mode CHANGES for added files
      --atime-preserve         don't change access times on dumped files
  -m, --modification-time      don't extract file modified time
      --same-owner             try extracting files with the same ownership
      --no-same-owner          extract files as yourself
      --numeric-owner          always use numbers for user/group names
  -p, --same-permissions       extract permissions information
      --no-same-permissions    do not extract permissions information
      --preserve-permissions   same as -p
  -s, --same-order             sort names to extract to match archive
      --preserve-order         same as -s
      --preserve               same as both -p and -s

Device selection and switching:
  -f, --file=ARCHIVE             use archive file or device ARCHIVE
      --force-local              archive file is local even if has a colon
      --rsh-command=COMMAND      use remote COMMAND instead of rsh
  -[0-7][lmh]                    specify drive and density
  -M, --multi-volume             create/list/extract multi-volume archive
  -L, --tape-length=NUM          change tape after writing NUM x 1024 bytes
  -F, --info-script=FILE         run script at end of each tape (implies -M)
      --new-volume-script=FILE   same as -F FILE
      --volno-file=FILE          use/update the volume number in FILE

Device blocking:
  -b, --blocking-factor=BLOCKS   BLOCKS x 512 bytes per record
      --record-size=SIZE         SIZE bytes per record, multiple of 512
  -i, --ignore-zeros             ignore zeroed blocks in archive (means EOF)
  -B, --read-full-records        reblock as we read (for 4.2BSD pipes)

Archive format selection:
  -V, --label=NAME                   create archive with volume name NAME
              PATTERN                at list/extract time, a globbing PATTERN
  -o, --old-archive, --portability   write a V7 format archive
      --posix                        write a POSIX format archive
  -j, --bzip2                        filter the archive through bzip2
  -z, --gzip, --ungzip               filter the archive through gzip
  -Z, --compress, --uncompress       filter the archive through compress
      --use-compress-program=PROG    filter through PROG (must accept -d)

Local file selection:
  -C, --directory=DIR          change to directory DIR
  -T, --files-from=NAME        get names to extract or create from file NAME
      --null                   -T reads null-terminated names, disable -C
      --exclude=PATTERN        exclude files, given as a PATTERN
  -X, --exclude-from=FILE      exclude patterns listed in FILE
      --anchored               exclude patterns match file name start (default)
      --no-anchored            exclude patterns match after any /
      --ignore-case            exclusion ignores case
      --no-ignore-case         exclusion is case sensitive (default)
      --wildcards              exclude patterns use wildcards (default)
      --no-wildcards           exclude patterns are plain strings
      --wildcards-match-slash  exclude pattern wildcards match '/' (default)
      --no-wildcards-match-slash exclude pattern wildcards do not match '/'
  -P, --absolute-names         don't strip leading `/'s from file names
  -h, --dereference            dump instead the files symlinks point to
      --no-recursion           avoid descending automatically in directories
  -l, --one-file-system        stay in local file system when creating archive
  -K, --starting-file=NAME     begin at file NAME in the archive
  -N, --newer=DATE             only store files newer than DATE
      --newer-mtime=DATE       compare date and time when data changed only
      --after-date=DATE        same as -N
      --backup[=CONTROL]       backup before removal, choose version control
      --suffix=SUFFIX          backup before removal, override usual suffix

Informative output:
      --help            print this help, then exit
      --version         print tar program version number, then exit
  -v, --verbose         verbosely list files processed
      --checkpoint      print directory names while reading the archive
      --totals          print total bytes written while creating archive
  -R, --block-number    show block number within archive with each message
  -w, --interactive     ask for confirmation for every action
      --confirmation    same as -w

The backup suffix is `~', unless set with --suffix or SIMPLE_BACKUP_SUFFIX.
The version control may be set with --backup or VERSION_CONTROL, values are:

  t, numbered     make numbered backups
  nil, existing   numbered if numbered backups exist, simple otherwise
  never, simple   always make simple backups

GNU tar cannot read nor produce `--posix' archives.  If POSIXLY_CORRECT
is set in the environment, GNU extensions are disallowed with `--posix'.
Support for POSIX is only partially implemented, don't count on it yet.
ARCHIVE may be FILE, HOST:FILE or USER@HOST:FILE; DATE may be a textual date
or a file name starting with `/' or `.', in which case the file's date is used.
*This* `tar' defaults to `-f- -b20'.

Report bugs to <bug-tar@gnu.org>.

No hay comentarios:

Publicar un comentario

zen consultora

Blogger Widgets

Entrada destacada

Platzy y el payaso Freddy Vega, PLATZI APESTA, PLATZI NO SIRVE, PLATZI ES UNA ESTAFA

  Platzy y los payasos fredy vega y cvander parte 1,  PLATZI ES UNA ESTAFA Hola amigos, este post va a ir creciendo conforme vaya escribiend...