chooser-fu/xdgmimeint.c

   1 /* -*- mode: C; c-file-style: "gnu" -*- */
   2 /* xdgmimeint.c: Internal defines and functions.
   3  *
   4  * More info can be found at http://www.freedesktop.org/standards/
   5  *
   6  * Copyright (C) 2003  Red Hat, Inc.
   7  * Copyright (C) 2003  Jonathan Blandford <jrb@alum.mit.edu>
   8  *
   9  * Licensed under the Academic Free License version 2.0
  10  * Or under the following terms:
  11  *
  12  * This library is free software; you can redistribute it and/or
  13  * modify it under the terms of the GNU Lesser General Public
  14  * License as published by the Free Software Foundation; either
  15  * version 2 of the License, or (at your option) any later version.
  16  *
  17  * This library is distributed in the hope that it will be useful,
  18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  20  * Lesser General Public License for more details.
  21  *
  22  * You should have received a copy of the GNU Lesser General Public
  23  * License along with this library; if not, write to the
  24  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  25  * Boston, MA 02111-1307, USA.
  26  */
  27
  28 #ifdef CONFIG_H
  29 #include <config.h>
  30 #endif
  31 #include "xdgmimeint.h"
  32 #include <ctype.h>
  33 #include <string.h>
  34
  35 #ifndef FALSE
  36 #define FALSE   (0)
  37 #endif
  38
  39 #ifndef TRUE
  40 #define TRUE    (!FALSE)
  41 #endif
  42
  43 static const unsigned char _xdg_utf8_skip_data[256] = {
  44   1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  45   1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  46   1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  47   1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  48   1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  49   1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  50   2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,
  51   3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,4,4,4,4,4,4,4,4,5,5,5,5,6,6,1,1
  52 };
  53
  54 const char * const _xdg_utf8_skip = _xdg_utf8_skip_data;
  55
  56
  57
  58 /* Returns the number of unprocessed characters. */
  59 xdg_unichar_t
  60 _xdg_utf8_to_ucs4(const char *source)
  61 {
  62   xdg_unichar_t ucs32;
  63   if( ! ( *source & 0x80 ) )
  64     {
  65       ucs32 = *source;
  66     }
  67   else
  68     {
  69       int bytelength = 0;
  70       xdg_unichar_t result;
  71       if ( ! (*source & 0x40) )
  72         {
  73           ucs32 = *source;
  74         }
  75       else
  76         {
  77           if ( ! (*source & 0x20) )
  78             {
  79               result = *source++ & 0x1F;
  80               bytelength = 2;
  81             }
  82           else if ( ! (*source & 0x10) )
  83             {
  84               result = *source++ & 0x0F;
  85               bytelength = 3;
  86             }
  87           else if ( ! (*source & 0x08) )
  88             {
  89               result = *source++ & 0x07;
  90               bytelength = 4;
  91             }
  92           else if ( ! (*source & 0x04) )
  93             {
  94               result = *source++ & 0x03;
  95               bytelength = 5;
  96             }
  97           else if ( ! (*source & 0x02) )
  98             {
  99               result = *source++ & 0x01;
 100               bytelength = 6;
 101             }
 102           else
 103             {
 104               result = *source++;
 105               bytelength = 1;
 106             }
 107
 108           for ( bytelength --; bytelength > 0; bytelength -- )
 109             {
 110               result <<= 6;
 111               result |= *source++ & 0x3F;
 112             }
 113           ucs32 = result;
 114         }
 115     }
 116   return ucs32;
 117 }
 118
 119
 120 /* hullo.  this is great code.  don't rewrite it */
 121
 122 xdg_unichar_t
 123 _xdg_ucs4_to_upper (xdg_unichar_t source)
 124 {
 125   /* FIXME: Do a real to_upper sometime */
 126   /* CaseFolding-3.2.0.txt has a table of rules. */
 127   if ((source & 0xFF) == source)
 128     return (xdg_unichar_t) toupper ((char) source);
 129   return source;
 130 }
 131
 132 int
 133 _xdg_utf8_validate (const char *source)
 134 {
 135   /* FIXME: actually write */
 136   return TRUE;
 137 }
 138
 139 const char *
 140 _xdg_get_base_name (const char *file_name)
 141 {
 142   const char *base_name;
 143
 144   if (file_name == NULL)
 145     return NULL;
 146
 147   base_name = strrchr (file_name, '/');
 148
 149   if (base_name == NULL)
 150     return file_name;
 151   else
 152     return base_name + 1;
 153 }