wmake/src/dirToString.c

   1 /*----------------------------------------------------------------------------*\
   2  =========                   |
   3  \\      /   F ield          | OpenFOAM: The Open Source CFD Toolbox
   4   \\    /    O peration      |
   5    \\  /     A nd            | Copyright (C) 2011 OpenFOAM Foundation
   6     \\/      M anipulation   |
   7 -------------------------------------------------------------------------------
   8 License
   9     This file is part of OpenFOAM.
  10
  11     OpenFOAM is free software: you can redistribute it and/or modify it
  12     under the terms of the GNU General Public License as published by
  13     the Free Software Foundation, either version 3 of the License, or
  14     (at your option) any later version.
  15
  16     OpenFOAM is distributed in the hope that it will be useful, but WITHOUT
  17     ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  18     FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  19     for more details.
  20
  21     You should have received a copy of the GNU General Public License
  22     along with OpenFOAM.  If not, see <http://www.gnu.org/licenses/>.
  23
  24 Application
  25     dirToString
  26
  27 Description
  28     converts a directory path into a string with appropriate capitalisation
  29     e.g. dir1/dir2 becomes dir1Dir2
  30
  31 Usage
  32     echo dirName | dirToString
  33
  34     e.g.
  35         using sh
  36         baseDirName=`echo $dir | sed 's%^\./%%' | $bin/dirToString`
  37
  38         using csh
  39         set baseDirName=`echo $dir | sed 's%^\./%%' | $bin/dirToString`
  40
  41 \*----------------------------------------------------------------------------*/
  42
  43 #include <stdio.h>
  44 #include <stdlib.h>
  45 #include <ctype.h>
  46
  47 int main()
  48 {
  49     int c;
  50     int nextupper = 0;
  51
  52     while ((c=getchar()) != EOF)
  53     {
  54         if (c == '/')
  55         {
  56             nextupper = 1;
  57         }
  58         else
  59         {
  60             if (nextupper)
  61             {
  62                 putchar(toupper(c));
  63             }
  64             else
  65             {
  66                 putchar(c);
  67             }
  68
  69             nextupper = 0;
  70         }
  71     }
  72
  73     return 0;
  74 }
  75
  76
  77 /*****************************************************************************/