Web alhem.net

lcnames.cpp

Go to the documentation of this file.

/*
Copyright (C) 2004  Anders Hedstrom

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
*/
#include <stdio.h>
#include <dirent.h>
#include <string.h>
#include <unistd.h>
#include <sys/stat.h>


void strlwr(char *s)
{
        for (size_t i = 0; i < strlen(s); i++)
        {
                if (s[i] >= 'A' && s[i] <= 'Z')
                        s[i] = s[i] | 32;
        }
}


void zz(char *fn)
{
        FILE *fil;
        FILE *fil2;
        size_t i;
        char fn_lc[256];
        char fntmp[256];

        printf("%s\n",fn);

        for (i = 0; i < strlen(fn); i++)
        {
                if (fn[i] >= 'A' && fn[i] <= 'Z')
                        fn_lc[i] = fn[i] | 32;
                else
                        fn_lc[i] = fn[i];
        }
        fn_lc[i] = 0;
        if (strcmp(fn,fn_lc))
        {
                rename(fn,fn_lc);
        }
        sprintf(fntmp,"%s.tmp",fn_lc);
        if ((fil = fopen(fn_lc,"rt")) != NULL)
        {
                char slask[1000];
                fil2 = fopen(fntmp,"wt");
                fgets(slask,1000,fil);
                while (!feof(fil))
                {
                        while (strlen(slask) && (slask[strlen(slask) - 1] == 13 || slask[strlen(slask) - 1] == 10))
                        {
                                slask[strlen(slask) - 1] = 0;
                        }
                        if (!strncmp(slask,"#include",8))
                        {
                                strlwr(slask);
                        }
                        fprintf(fil2,"%s\n",slask);
                        //
                        fgets(slask,1000,fil);
                }
                fclose(fil);
                fclose(fil2);
                unlink(fn_lc);
                rename(fntmp,fn_lc);
        }
}


int main(int argc,char *argv[])
{
        DIR *dir;
        bool ok = false;
        struct stat st;

        for (int i = 1; i < argc; i++)
                if (!strcmp(argv[i],"-ok"))
                        ok = true;
        if ((dir = opendir(".")) != NULL)
        {
                struct dirent *p = readdir(dir);
                while (p)
                {
                        stat(p -> d_name, &st);
//                      printf(" type: %08x  name: %s\n",st.st_mode,filename); //p -> d_name);
                        if (S_ISDIR(st.st_mode))
                        {
                        }
                        else
                        {
                                printf("%s\n",p -> d_name);
                                if (ok && p -> d_name[0] != '.')
                                {
                                        zz(p -> d_name);
                                }
                        }
                        //
                        p = readdir(dir);
                }
                closedir(dir);
        }
}

---