mf_dirname.c
上传用户:romrleung
上传日期:2022-05-23
资源大小:18897k
文件大小:4k
源码类别:

MySQL数据库

开发平台:

Visual C++

  1. /* Copyright (C) 2000 MySQL AB
  2.    This program is free software; you can redistribute it and/or modify
  3.    it under the terms of the GNU General Public License as published by
  4.    the Free Software Foundation; either version 2 of the License, or
  5.    (at your option) any later version.
  6.    This program is distributed in the hope that it will be useful,
  7.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  8.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  9.    GNU General Public License for more details.
  10.    You should have received a copy of the GNU General Public License
  11.    along with this program; if not, write to the Free Software
  12.    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
  13. #include "mysys_priv.h"
  14. #include <m_string.h>
  15. /* Functions definied in this file */
  16. uint dirname_length(const char *name)
  17. {
  18.   register my_string pos,gpos;
  19. #ifdef BASKSLASH_MBTAIL
  20.   CHARSET_INFO *fs= fs_character_set();
  21. #endif
  22. #ifdef FN_DEVCHAR
  23.   if ((pos=(char*)strrchr(name,FN_DEVCHAR)) == 0)
  24. #endif
  25.     pos=(char*) name-1;
  26.   gpos= pos++;
  27.   for ( ; *pos ; pos++) /* Find last FN_LIBCHAR */
  28.   {
  29. #ifdef BASKSLASH_MBTAIL
  30.     uint l;
  31.     if (use_mb(fs) && (l= my_ismbchar(fs, pos, pos + 3)))
  32.     {
  33.       pos+= l - 1;
  34.       continue;
  35.     }
  36. #endif
  37.     if (*pos == FN_LIBCHAR || *pos == '/'
  38. #ifdef FN_C_AFTER_DIR
  39. || *pos == FN_C_AFTER_DIR || *pos == FN_C_AFTER_DIR_2
  40. #endif
  41. )
  42.       gpos=pos;
  43.   }
  44.   return ((uint) (uint) (gpos+1-(char*) name));
  45. }
  46. /* Gives directory part of filename. Directory ends with '/' */
  47. /* Returns length of directory part */
  48. uint dirname_part(my_string to, const char *name)
  49. {
  50.   uint length;
  51.   DBUG_ENTER("dirname_part");
  52.   DBUG_PRINT("enter",("'%s'",name));
  53.   length=dirname_length(name);
  54.   convert_dirname(to, name, name+length);
  55.   DBUG_RETURN(length);
  56. } /* dirname */
  57. /*
  58.   Convert directory name to use under this system
  59.   SYNPOSIS
  60.     convert_dirname()
  61.     to Store result here
  62.     from Original filename
  63.     from_end Pointer at end of filename (normally end )
  64.   IMPLEMENTATION
  65.     If MSDOS converts '/' to ''
  66.     If VMS converts '<' to '[' and '>' to ']'
  67.     Adds a FN_LIBCHAR to end if the result string if there isn't one
  68.     and the last isn't dev_char.
  69.     Copies data from 'from' until ASCII(0) for until from == from_end
  70.     If you want to use the whole 'from' string, just send NullS as the
  71.     last argument.
  72.     If the result string is larger than FN_REFLEN -1, then it's cut.
  73.   RETURN
  74.    Returns pointer to end  in to
  75. */
  76. #ifndef FN_DEVCHAR
  77. #define FN_DEVCHAR '' /* For easier code */
  78. #endif
  79. char *convert_dirname(char *to, const char *from, const char *from_end)
  80. {
  81.   char *to_org=to;
  82. #ifdef BACKSLASH_MBTAIL
  83.   CHARSET_INFO *fs= fs_character_set();
  84. #endif
  85.   /* We use -2 here, becasue we need place for the last FN_LIBCHAR */
  86.   if (!from_end || (from_end - from) > FN_REFLEN-2)
  87.     from_end=from+FN_REFLEN -2;
  88. #if FN_LIBCHAR != '/' || defined(FN_C_BEFORE_DIR_2)
  89.   {
  90.     for (; *from && from != from_end; from++)
  91.     {
  92.       if (*from == '/')
  93. *to++= FN_LIBCHAR;
  94. #ifdef FN_C_BEFORE_DIR_2
  95.       else if (*from == FN_C_BEFORE_DIR_2)
  96. *to++= FN_C_BEFORE_DIR;
  97.       else if (*from == FN_C_AFTER_DIR_2)
  98. *to++= FN_C_AFTER_DIR;
  99. #endif
  100.       else
  101.       {
  102. #ifdef BACKSLASH_MBTAIL
  103.         uint l;
  104.         if (use_mb(fs) && (l= my_ismbchar(fs, from, from + 3)))
  105.         {
  106.           memmove(to, from, l);
  107.           to+= l;
  108.           from+= l - 1;
  109.           to_org= to; /* Don't look inside mbchar */
  110.         }
  111.         else
  112. #endif
  113.         {
  114.           *to++= *from;
  115.         }
  116.       }
  117.     }
  118.     *to=0;
  119.   }
  120. #else
  121.   /* This is ok even if to == from, becasue we need to cut the string */
  122.   to= strmake(to, from, (uint) (from_end-from));
  123. #endif
  124.   /* Add FN_LIBCHAR to the end of directory path */
  125.   if (to != to_org && (to[-1] != FN_LIBCHAR && to[-1] != FN_DEVCHAR))
  126.   {
  127.     *to++=FN_LIBCHAR;
  128.     *to=0;
  129.   }
  130.   return to; /* Pointer to end of dir */
  131. } /* convert_dirname */