char *convert_dirname(char *to, const char *from, const char *from_end) { char *to_org=to; /* We use -2 here, becasue we need place for the last FN_LIBCHAR */ if (!from_end || (from_end - from) > FN_REFLEN-2) from_end=from+FN_REFLEN -2; #if FN_LIBCHAR != '/' || defined(FN_C_BEFORE_DIR_2) { for (; *from && from != from_end; from++) { if (*from == '/') *to++= FN_LIBCHAR; #ifdef FN_C_BEFORE_DIR_2 else if (*from == FN_C_BEFORE_DIR_2) *to++= FN_C_BEFORE_DIR; else if (*from == FN_C_AFTER_DIR_2) *to++= FN_C_AFTER_DIR; #endif else *to++= *from; } *to=0; } #else /* This is ok even if to == from, becasue we need to cut the string */ to= strmake(to, from, (uint) (from_end-from)); #endif /* Add FN_LIBCHAR to the end of directory path */ if (to != to_org && (to[-1] != FN_LIBCHAR && to[-1] != FN_DEVCHAR)) { *to++=FN_LIBCHAR; *to=0; } #ifdef FN_UPPER_CASE caseup_str(to_org); #endif #ifdef FN_LOWER_CASE casedn_str(to_org); #endif return to; /* Pointer to end of dir */ } /* convert_dirname */
my_string fn_format(my_string to, const char *name, const char *dsk, const char *form, int flag) { reg1 uint length; char dev[FN_REFLEN], buff[BUFF_LEN], *pos, *startpos; const char *ext; DBUG_ENTER("fn_format"); DBUG_PRINT("enter",("name: %s dsk: %s form: %s flag: %d", name,dsk,form,flag)); /* Kopiera & skippa enheten */ name+=(length=dirname_part(dev,(startpos=(my_string) name))); if (length == 0 || flag & 1) { (void) strmake(dev,dsk, sizeof(dev) - 2); /* Use given directory */ convert_dirname(dev); /* Fix to this OS */ } if (flag & 8) pack_dirname(dev,dev); /* Put in ./.. and ~/.. */ if (flag & 4) (void) unpack_dirname(dev,dev); /* Replace ~/.. with dir */ if ((pos=(char*)strchr(name,FN_EXTCHAR)) != NullS) { if ((flag & 2) == 0) /* Skall vi byta extension ? */ { length=strlength(name); /* Old extension */ ext = ""; } else { length=(uint) (pos-(char*) name); /* Change extension */ ext= form; } } else { length=strlength(name); /* Har ingen ext- tag nya */ ext=form; } if (strlen(dev)+length+strlen(ext) >= FN_REFLEN || length >= FN_LEN ) { /* To long path, return original */ uint tmp_length; if (flag & 64) return 0; tmp_length=strlength(startpos); DBUG_PRINT("error",("dev: '%s' ext: '%s' length: %d",dev,ext,length)); (void) strmake(to,startpos,min(tmp_length,FN_REFLEN-1)); } else { if (to == startpos) { bmove(buff,(char*) name,length); /* Save name for last copy */ name=buff; } pos=strmake(strmov(to,dev),name,length); #ifdef FN_UPPER_CASE caseup_str(to); #endif #ifdef FN_LOWER_CASE casedn_str(to); #endif (void) strmov(pos,ext); /* Don't convert extension */ } /* Purify gives a lot of UMR errors when using realpath */ #if defined(HAVE_REALPATH) && !defined(HAVE_purify) && !defined(HAVE_BROKEN_REALPATH) if (flag & 16) { struct stat stat_buff; if (flag & 32 || (!lstat(to,&stat_buff) && S_ISLNK(stat_buff.st_mode))) { if (realpath(to,buff)) strmake(to,buff,FN_REFLEN-1); } } #endif DBUG_RETURN (to); } /* fn_format */