//SwitchLowRes
//
// Date: 2004/05/15
// Author: Dai Sato   dstruevision@dstruevision.com    http://www.dstruevision.com
// Procedure Name: SwitchLowRes
// 
// Description: This scripts enable you to switch texture file between normal one and low-res one.
// To use this function, you have to make low-res one manually. File name have to be as filename_LowRes.extension. 
// ex. lambert1.testLowRes.Color.tga¨lambert1.testLowRes.Color_LowRes.tga
    

proc string extractFileName(string $path)
    {    
	    string $tokens[];
	    int $numTokens = `tokenize $path "/" $tokens`;
            return $tokens[$numTokens-1];    
    }

proc string extractDir(string $path)
    {   
            string $tokens[];
	    int $numTokens = `tokenize $path "/" $tokens`;
          if($numTokens<2) {
               return $path;
                        }
          else {
            return $tokens[$numTokens-2];    
               }
    }

proc string extractExtension(string $extractedFilename)
    {    
	    string $tokens[];
	    int $numTokens = `tokenize $extractedFilename "." $tokens`;
	    return $tokens[$numTokens -1];
    }

proc string cutExtension(string $fileName)
    {
           string $tokens[];
	   string $noExtension ="";
           string $buffer = "";
 
            int $numTokens = `tokenize $fileName "." $tokens`;
              
             for ($i=$numTokens-2;$i>=0;$i--)
                {
                    $noExtension = ($tokens[$i] + "." + $buffer);
		    $buffer = $noExtension;
                 }

              return $noExtension;
     }

proc string cutDot(string $fileName, string $flag)
    {
           string $tokens[];
	   string $noExtension ="";
           string $buffer = "";
 
            int $numTokens = `tokenize $fileName "." $tokens`;
              
             for ($i=($numTokens-1);$i>=0;$i--){  
                  if($i==($numTokens-1)){
                     if($flag==1) {
                      $noExtension = $tokens[$i]+"_LowRes";
                                   }
                     if($flag==2) {
                      $noExtension = $tokens[$i];
                                   }
                        }
                  else {
                    $noExtension = ($tokens[$i] + "." + $buffer);
                       }
		    $buffer = $noExtension;
                                             }

              return $noExtension;
}


proc string checkLowRes(string $fileName)    {
 
string $nativeWD = `workspace -q -rd`;
string $currentWD = toNativePath($nativeWD);   
string $defaultDir = $currentWD + "sourceimages/";
string $foundFiles[] = `getFileList -folder $defaultDir`;
string $noExtension = cutExtension($fileName);
string $noDot = cutDot($noExtension,1);
string $flag;

for($i=0;$i<size($foundFiles);$i++) {
string $tokens[];
string $foundFileNoExtension = cutExtension($foundFiles[$i]);
string $foundFileNoDot = cutDot($foundFileNoExtension, 2);
int $numTokens = `tokenize $foundFileNoExtension "_" $tokens`;
if($tokens[$numTokens-1]=="LowRes."&&$noDot==$foundFileNoDot) {
$flag="LowRes";
                         }
                                     }

	                           
    if($flag=="LowRes") {
            return "LowRes";
                             }
    else {
            return "NotFound";  
         }
    
}



proc string checkFileName(string $noDot) {

string $tokens[];
int $numTokens = `tokenize $noDot "_" $tokens`;
print $tokens[$numTokens-1];

if($tokens[$numTokens-1]=="LowRes") {
        return "cut";
                                      }
else {
 return "leave";
}

}



proc string cutLowRes(string $noDot) {
 
           string $tokens[];
           string $tmp;
           string $buffer = "";
  
            int $numTokens = `tokenize $noDot "_" $tokens`;
             
             for ($i=0;$i<($numTokens-1);$i++) {
                   if($i==0) {
                     $tmp = $buffer+$tokens[$i];
                                         }
                   else{
                    $tmp = $buffer+"_"+$tokens[$i];
                       }
                    $buffer = $tmp; 
                 }
                           

              return $buffer;
}



global proc slr_SwitchLowRes () {

$textureNodes = `ls -type file`;
string $newFileName;
string $switchCheck = `radioButtonGrp -q -sl slr_radio`;


$progressMax = size($textureNodes);
if($progressMax != 0)
{
progressBar -edit -beginProgress -isInterruptable true -status "Calculation ..." -maxValue $progressMax slr_mainProgressBar;

for ($node in $textureNodes)
		    {
string $fullFileName = `getAttr($node+".fileTextureName")`;


if(!($fullFileName=="")){
 string $path = extractDir($fullFileName);
 string $fileName = extractFileName($fullFileName);
 string $flag = checkLowRes($fileName);
 string $noExtension = cutExtension($fileName);
 string $noDot = cutDot($noExtension, 2);
 string $extension = extractExtension($fileName);


if($flag=="LowRes"&&$switchCheck==2) {
$newFileName = $path+"/"+$noDot+"_LowRes."+$extension;
setAttr ( $node + ".fileTextureName") -type "string" $newFileName;
                    }
else {
$checkFileName = checkFileName($noDot);
if($checkFileName=="cut") {
$tmp = cutLowRes($noDot);
$newFileName = $path+"/"+$tmp+"."+$extension;
setAttr ( $node + ".fileTextureName") -type "string" $newFileName;
                          }
     }
                        }
progressBar -edit -step 1 slr_mainProgressBar;
                 }
progressBar -edit -endProgress slr_mainProgressBar;
}

}

global proc SwitchLowRes () {

global int $progressMax = 10;

if ((`window -ex SwitchLowResWindow`) == true) deleteUI SwitchLowResWindow;
window -t "SwitchLowRes" -s true -mnb true -mxb true -mb true -w 100 -h 200  SwitchLowResWindow;
columnLayout slr_mainLayout;
 
columnLayout -rs 3;
progressBar -width 150 -height 10 slr_mainProgressBar;
radioButtonGrp -numberOfRadioButtons 2 -sl 1 -cw2 80 80
    	-labelArray2 "Normal" "LowRes" slr_radio;
rowColumnLayout -numberOfRows 1;
button -l "Change" -w 50 -h 30 -c "slr_SwitchLowRes()";
//button -l "Undo" -w 50 -h 30 -c "undo";
window -e -width 250 -height 130 SwitchLowResWindow;
showWindow;

}