src/gmxlib/replace.c

   1 /*
   2  *
   3  *                This source code is part of
   4  *
   5  *                 G   R   O   M   A   C   S
   6  *
   7  *          GROningen MAchine for Chemical Simulations
   8  *
   9  *                        VERSION 3.2.0
  10  * Written by David van der Spoel, Erik Lindahl, Berk Hess, and others.
  11  * Copyright (c) 1991-2000, University of Groningen, The Netherlands.
  12  * Copyright (c) 2001-2004, The GROMACS development team,
  13  * check out http://www.gromacs.org for more information.
  14
  15  * This program is free software; you can redistribute it and/or
  16  * modify it under the terms of the GNU General Public License
  17  * as published by the Free Software Foundation; either version 2
  18  * of the License, or (at your option) any later version.
  19  *
  20  * If you want to redistribute modifications, please consider that
  21  * scientific software is very special. Version control is crucial -
  22  * bugs must be traceable. We will be happy to consider code for
  23  * inclusion in the official distribution, but derived work must not
  24  * be called official GROMACS. Details are found in the README & COPYING
  25  * files - if they are missing, get the official version at www.gromacs.org.
  26  *
  27  * To help us fund GROMACS development, we humbly ask that you cite
  28  * the papers on the package - you can find them in the top README file.
  29  *
  30  * For more info, check our website at http://www.gromacs.org
  31  *
  32  * And Hey:
  33  * GROningen Mixture of Alchemy and Childrens' Stories
  34  */
  35 /* This file is completely threadsafe - keep it that way! */
  36 #ifdef HAVE_CONFIG_H
  37 #include <config.h>
  38 #endif
  39
  40 #include <ctype.h>
  41 #include "string2.h"
  42 #include "smalloc.h"
  43 #include "macros.h"
  44 #include "replace.h"
  45
  46 char *replace(const char *string,const char *search,const char *replace)
  47 {
  48   char *buf=NULL,*ptr=NULL,*bufptr=NULL;
  49   int  blen,stringlen,slen,rlen;
  50   int  i,j,tmp;
  51
  52   slen=strlen(search);
  53   stringlen=strlen(string);
  54   if ((string == NULL) || (slen == 0) || (stringlen == 0)) {
  55     if (string)
  56       buf=strdup(string);
  57     return buf;
  58   }
  59   rlen=strlen(replace);
  60   blen=max(stringlen,(rlen*stringlen)/slen);
  61   snew(buf,blen+1);
  62   strcpy(buf,string);
  63
  64   bufptr=buf;
  65   while ((ptr=strstr(bufptr,search)) != NULL) {
  66     if (rlen <= slen) {
  67       for(i=0; (i<rlen); i++)
  68         ptr[i]=replace[i];
  69       if (rlen < slen) {
  70         while (ptr[i+slen-rlen] != '\0') {
  71           ptr[i]=ptr[i+slen-rlen];
  72           i++;
  73         }
  74         ptr[i]='\0';
  75       }
  76     }
  77     else {
  78       tmp=strlen(ptr);
  79       for(j=tmp; (j>=slen); j--)
  80         ptr[rlen-slen+j]=ptr[j];
  81       for(i=0; (i<rlen); i++)
  82         ptr[i]=replace[i];
  83     }
  84     bufptr=ptr+rlen;
  85   }
  86
  87   return buf;
  88 }
  89
  90 char *replaceww(const char *string,const char *search,const char *replace)
  91 {
  92   char *buf=NULL,*ptr=NULL,*bufptr=NULL;
  93   int  buflen,stringlen,searchlen,replacelen;
  94   int  i,j;
  95
  96   searchlen=strlen(search);
  97   stringlen=strlen(string);
  98   if ((string == NULL) || (searchlen == 0) || (stringlen == 0)) {
  99     if (string)
 100       buf=strdup(string);
 101     return buf;
 102   }
 103   replacelen=strlen(replace);
 104   buflen=max(stringlen,(replacelen*stringlen)/searchlen);
 105   snew(buf,buflen+1);
 106   strcpy(buf,string);
 107
 108   bufptr=buf;
 109   while ((ptr=strstr(bufptr,search)) != NULL) {
 110     if (((ptr==bufptr) || !isalnum(ptr[-1])) && !isalnum(ptr[searchlen])) {
 111       if (replacelen <= searchlen) {
 112         for(i=0; (i<replacelen); i++)
 113           ptr[i]=replace[i];
 114         if (replacelen < searchlen) {
 115           while (ptr[i+searchlen-replacelen] != '\0') {
 116             ptr[i]=ptr[i+searchlen-replacelen];
 117             i++;
 118           }
 119           ptr[i]='\0';
 120         }
 121       }
 122       else {
 123         for(j=strlen(ptr); (j>=searchlen); j--)
 124           ptr[replacelen-searchlen+j]=ptr[j];
 125         for(i=0; (i<replacelen); i++)
 126           ptr[i]=replace[i];
 127       }
 128       bufptr=ptr+replacelen;
 129     } else
 130       bufptr=ptr+searchlen;
 131   }
 132
 133   return buf;
 134 }
 135
 136 #ifdef DEBUGREPLACE
 137 void main(int argc,char *argv[])
 138 {
 139   printf("String was: '%s' Search: '%s' Replace: '%s'\n",
 140          argv[1],argv[2],argv[3]);
 141   printf("String now: '%s'\n\n",replace(argv[1],argv[2],argv[3]));
 142 }
 143 #endif