Return to replace.c CVS log

Up to [MW Coherent from dump] / coherent / g / usr / lib / misc

Annotation of coherent/g/usr/lib/misc/replace.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * replace(s1, pat, s3, all, matcher)
        !             3:  * find pat in s1 and replace it with s3
        !             4:  * return the result in a new malloced string.
        !             5:  * or NULL if s1 not in pat. Set all to 1 to
        !             6:  * replace all occurances 0 to replace the first.
        !             7:  */
        !             8: #include "local_misc.h"
        !             9: 
        !            10: char *
        !            11: replace(s1, pat, s3, all, matcher)
        !            12: char *s1, *pat, *s3;
        !            13: int all;
        !            14: char * (*matcher)();
        !            15: {
        !            16:        int i;
        !            17:        char *w1, *w2, *w3, *w;
        !            18: 
        !            19:        if (NULL == (w2 = (*matcher)(s1, pat, &w3)))
        !            20:                return (NULL);
        !            21:        w = w1 = alloc(strlen(s1) + 1 + (i=strlen(s3)) + (int)ptrdiff(w2, w3));
        !            22:        for (; s1 != w2;)
        !            23:                *w1++ = *s1++;
        !            24:        strcpy(w1, s3);
        !            25:        if (!all || (NULL == (w2 = replace(w3, pat, s3, all, matcher)))) {
        !            26:                strcpy(w1 + i, w3);
        !            27:                return (w);
        !            28:        }
        !            29:        strcpy((w3 = alloc(strlen(w2) + 1 + (i = strlen(w)))), w);
        !            30:        free(w);
        !            31:        strcpy(w3 + i, w2);
        !            32:        free(w2);
        !            33:        return (w3);
        !            34: }
        !            35: #ifdef TEST
        !            36: extern char *strstr();
        !            37: 
        !            38: /*
        !            39:  * function to find by string
        !            40:  */
        !            41: char *
        !            42: strfind(s1, s2, fin)
        !            43: char *s1, *s2, **fin;
        !            44: {
        !            45:        char *w1;
        !            46: 
        !            47:        if (NULL == (w1 = strstr(s1, s2)))
        !            48:                return (NULL);
        !            49:        *fin = w1 + strlen(s2);
        !            50:        return (w1);
        !            51: }
        !            52: 
        !            53: main()
        !            54: {
        !            55:        if (yn("Match by pattern "))
        !            56:                for (;;) {
        !            57:                        char s1[80], pat[80], s3[80], *s;
        !            58:                        int all;
        !            59: 
        !            60:                        ask(s1, "S1 ");
        !            61:                        if (!strcmp(s1, "quit"))
        !            62:                                exit(0);
        !            63:                        ask(pat, "pat");
        !            64:                        ask(s3, "S3 ");
        !            65:                        all = yn("all");
        !            66:                        if (NULL == (s = replace(s1, pat, s3, all, match)))
        !            67:                                printf("Not found\n");
        !            68:                        else {
        !            69:                                printf("%s\n", s);
        !            70:                                free(s);
        !            71:                        }
        !            72:                }
        !            73:        else
        !            74:                for (;;) {
        !            75:                        char s1[80], s2[80], s3[80], *s;
        !            76:                        int all;
        !            77: 
        !            78:                        ask(s1, "S1");
        !            79:                        if (!strcmp(s1, "quit"))
        !            80:                                exit(0);
        !            81:                        ask(s2, "S2");
        !            82:                        ask(s3, "S3");
        !            83:                        all = yn("all");
        !            84:                        if (NULL == (s = replace(s1, s2, s3, all, strfind)))
        !            85:                                printf("Not found\n");
        !            86:                        else {
        !            87:                                printf("%s\n", s);
        !            88:                                free(s);
        !            89:                        }
        !            90:                }
        !            91: }
        !            92: #endif

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.