| 370d54 | 2002-01-07 | Peter Bortas | | #!/usr/bin/env pike
|
| 95d082 | 1999-03-19 | David Hedbor | | import Stdio;
|
| 5267b7 | 1995-08-09 | Fredrik Hübinette (Hubbe) | |
|
| 936d2b | 1996-03-02 | Fredrik Hübinette (Hubbe) | | int main(int argc, string *argv)
|
| 5267b7 | 1995-08-09 | Fredrik Hübinette (Hubbe) | | {
|
| cb2256 | 1995-10-11 | Fredrik Hübinette (Hubbe) | | int i;
|
| 5267b7 | 1995-08-09 | Fredrik Hübinette (Hubbe) | | string file;
|
| 95d082 | 1999-03-19 | David Hedbor | |
if(argc < 4)
|
| 5267b7 | 1995-08-09 | Fredrik Hübinette (Hubbe) | | {
|
| 95d082 | 1999-03-19 | David Hedbor | | werror("Usage: rsif <from> <to> <files>\n");
|
| 936d2b | 1996-03-02 | Fredrik Hübinette (Hubbe) | | return 1;
|
| 5267b7 | 1995-08-09 | Fredrik Hübinette (Hubbe) | | }
|
| 95d082 | 1999-03-19 | David Hedbor | | for(i = 3; i < argc; i++)
|
| 5267b7 | 1995-08-09 | Fredrik Hübinette (Hubbe) | | {
|
| 06983f | 1996-09-22 | Fredrik Hübinette (Hubbe) | | string file_contents;
|
| 95d082 | 1999-03-19 | David Hedbor | | if(file_contents = read_bytes(argv[i]))
|
| 5267b7 | 1995-08-09 | Fredrik Hübinette (Hubbe) | | {
|
| 95d082 | 1999-03-19 | David Hedbor | | if(-1 != search(file_contents,argv[1]))
|
| 5267b7 | 1995-08-09 | Fredrik Hübinette (Hubbe) | | {
|
| 95d082 | 1999-03-19 | David Hedbor | | write("Processing %s.\n", argv[i]);
file_contents = replace(file_contents,argv[1],argv[2]);
|
| 5267b7 | 1995-08-09 | Fredrik Hübinette (Hubbe) | |
|
| 95d082 | 1999-03-19 | David Hedbor | | if( mv(argv[i], argv[i]+"~") )
|
| 5267b7 | 1995-08-09 | Fredrik Hübinette (Hubbe) | | {
|
| 95d082 | 1999-03-19 | David Hedbor | | write_file(argv[i], file_contents);
} else {
|
| 5267b7 | 1995-08-09 | Fredrik Hübinette (Hubbe) | | write("Failed to create backup file.\n");
}
}
}
}
|
| 95d082 | 1999-03-19 | David Hedbor | |
|
| 936d2b | 1996-03-02 | Fredrik Hübinette (Hubbe) | | return 0;
|
| 5267b7 | 1995-08-09 | Fredrik Hübinette (Hubbe) | | }>
|