# coding=utf-8
# author=veficos

import codecs
import zlib
import re
import os

from tkinter import *
from tkinter import ttk
from tkinter.filedialog import askopenfilename, askdirectory


def decompress_krc(krcbytes):
    key = bytearray([ 0x0040, 0x0047, 0x0061, 0x0077, 0x005e, 0x0032, 0x0074, 0x0047, 0x0051, 0x0036, 0x0031, 0x002d, 0x00ce, 0x00d2, 0x006e, 0x0069])
    decompress_bytes = []
    i = 0

    for ch in krcbytes[4:]:
        decompress_bytes.append(ch ^ key[i % 16])
        i = i + 1

    decode_bytes = zlib.decompress(bytearray(decompress_bytes)).decode('utf-8-sig')
    decode_bytes = re.sub(r'<[^>]*>', '', decode_bytes)

    for match in re.finditer(r'\[(\d*),\d*\]', decode_bytes):
        ms = int(match.group(1))
        time = '[%.2d:%.2d.%.2d]' % ((ms % (1000 * 60 * 60)) / (1000 * 60), (ms % (1000 * 60)) / 1000, (ms % (1000 * 60)) % 100)
        decode_bytes = decode_bytes.replace(match.group(0), time)

    return decode_bytes


def krc2lrc(file, saveto):
    with codecs.open(file, 'rb') as f:
        decode_bytes = decompress_krc(bytearray(f.read()))
        fp = codecs.open(saveto, "w", 'utf-8')
        fp.write(decode_bytes)
        fp.close()


root = Tk()
savedir = ''

def select_files_command():
    names = askopenfilename(filetypes =(("Kugou Krc File", "*.krc"), ("All Files", "*.*")),
                            title = "Choose a krc file.", multiple=True)
    
    try:
        for file in names:
            saveto = os.path.join(savedir, os.path.basename(file).replace('.krc', '.lrc') if savedir else file.replace('.krc', '.lrc'))
            krc2lrc(file, saveto)
            label = ttk.Label(root, text ="%s转换成功" % os.path.basename(file))
            label.pack(side=BOTTOM)
    except Exception as e:
        label = ttk.Label(root, text ="转换失败: %s" % str(e))
        label.pack(side=BOTTOM)

def select_savedir_command():
    global savedir
    
    name = askdirectory()
    savedir = os.path.join(savedir, name)
    

Title = root.title("krc2lrc小工具")

menu = Menu(root)
root.config(menu=menu)

file = Menu(menu)

file.add_command(label = 'Open', command = select_files_command)
file.add_command(label = 'SaveTo', command = select_savedir_command)

menu.add_cascade(label = 'File', menu = file)
menu.add_cascade(label = 'Exit', command = lambda:exit())

root.mainloop()
复制代码

/**
 * 
 */
package cn.tcg.music.tools;

import java.io.BufferedWriter;
import java.io.ByteArrayOutputStream;
import java.io.File;
import java.io.FileFilter;
import java.io.FileInputStream;
import java.io.FileWriter;
import java.io.IOException;
import java.util.zip.Inflater;

/**
 * 将KuGou歌词文件krc转换为lrc 创建于 2017年4月28日 下午9:52:11
 * 
 * @author tcg2008
 *
 */
public class KRC2LRC
{
	private static int key[] =
	{ 64, 71, 97, 119, 94, 50, 116, 71, 81, 54, 49, 45, 206, 210, 110, 105 };

	/**
	 * 是否krc格式
	 * 
	 * @param datas
	 * @return
	 */
	public static boolean iskrc(byte[] datas)
	{
		if (datas.length < 4)
		{
			System.out.println("长度不够");
			return false;
		}
		if (datas[0] == 'k' && datas[1] == 'r' && datas[2] == 'c' && datas[3] == '1')
		{
			return true;
		}
		return false;
	}

	public static void main(String... args) throws IOException
	{
		//转换歌曲文件夹
		File inPath = new File("C:/Users/zzz/Desktop/krc");
		File outPath = new File("C:/Users/zzz/Desktop/lrc");
		outPath.mkdirs(); 
		File[] files = inPath.listFiles(new FileFilter()
		{
			@Override
			public boolean accept(File pathname)
			{
				return pathname.isFile();
			}
		});
		for (File krcPath : files)
		{
			String fileName = krcPath.getName();
			File lrcPath = new File(outPath, (fileName.substring(0, fileName.lastIndexOf(".")) + ".lrc"));
			try
			{
				krc2lrc(krcPath, lrcPath);
			} catch (IOException e)
			{
				e.printStackTrace();
			}
		} 
	}

	public static void krc2lrc(File krcPath, File lrcPath) throws IOException
	{
		System.out.println(krcPath);
		try
		{
			byte[] datas = readAllBytes(krcPath);
			if (!iskrc(datas))
			{
				System.out.println("不是krc格式");
				return;
			}
			byte[] _datas = new byte[datas.length - 4];
			System.arraycopy(datas, 4, _datas, 0, datas.length - 4);
			for (int i = 0; i < _datas.length; i++)
			{
				_datas[i] = (byte) (_datas[i] ^ key[i % 16]);
			}
			Inflater decompresser = new Inflater();
			decompresser.setInput(_datas);
			ByteArrayOutputStream sb = new ByteArrayOutputStream();
			byte[] buf = new byte[1024];
			while (!decompresser.finished())
			{
				int leng = decompresser.inflate(buf);
				sb.write(buf, 0, leng);
			}
			// System.out.println("解压长度:" + sb.toByteArray().length);
			String lines[] = new String(sb.toByteArray()).split("\n");
			// System.out.println("行数:" + lines.length);
			try (BufferedWriter writer = new BufferedWriter(new FileWriter(lrcPath)))
			{
				for (String line : lines)
				{
					int i1 = line.indexOf("]");
					String timestr = line.substring(1, i1);
					String times[] = timestr.split(",");
					if (times.length == 2)
					{
						int ms = Integer.parseInt(times[0]);
						String time = String.format("[%02d:%02d.%02d]", (ms % (1000 * 60 * 60)) / (1000 * 60),
								(ms % (1000 * 60)) / 1000, (ms % (1000 * 60)) % 100);
						writer.write(time);
						writer.write(line.substring(i1 + 1).replaceAll("<.*?>", ""));
					} else
					{
						writer.write(line);
					}
				}
			}
		} catch (Exception e)
		{
			e.printStackTrace();
		}
	}

	/**
	 * @param file
	 * @return
	 */
	private static byte[] readAllBytes(File file)
	{
		try (FileInputStream is = new FileInputStream(file))
		{
			byte[] data = new byte[(int) file.length()];
			is.read(data);
			return data;
		} catch (IOException e)
		{
			e.printStackTrace();
		}
		return null;
	}
}
复制代码

#ifdef WIN32
#define  _CRT_SECURE_NO_WARNINGS
#endif

#include <stdio.h>
#include <wchar.h>
#include <errno.h>
#include <stdlib.h>
#include <string.h>
#include <malloc.h>
#include <sys/stat.h>
#include "zlib/zconf.h"
#include "zlib/zlib.h"

const static wchar_t key[] = { L'@', L'G', L'a', L'w', L'^', L'2', 
                               L't', L'G', L'Q', L'6', L'1', L'-', 
                               L'Î', L'ò', L'n', L'i'};

static unsigned char result[1024*1024];

int sncasecmp(char *s1, char *s2, size_t n)
{
    unsigned int  c1, c2;

    while (n) {
        c1 = (unsigned int)*s1++;
        c2 = (unsigned int)*s2++;

        c1 = (c1 >= 'A' && c1 <= 'Z') ? (c1 | 0x20) : c1;
        c2 = (c2 >= 'A' && c2 <= 'Z') ? (c2 | 0x20) : c2;

        if (c1 == c2) {

            if (c1) {
                n--;
                continue;
            }

            return 0;
        }

        return c1 - c2;
    }

    return 0;
}

int decompression(unsigned char *src, size_t srcsize, unsigned char *dst, size_t *dstsize)
{
    *dstsize = 1024 * 1024;
    if (Z_OK != uncompress(result, dstsize, src, srcsize))
        return -1;

    return 0;
}

int isfilter(char *tok, int len) 
{
    if (!sncasecmp(tok, "[id", 3)) {
        return 1;
    } else if (!sncasecmp(tok, "[by", 3)) {
        return 1;
    } else if (!sncasecmp(tok, "[hash", 5)) {
        return 1;
    } else if (!sncasecmp(tok, "[al", 3)) {
        return 1;
    } else if (!sncasecmp(tok, "[sign", 5)) {
        return 1;
    } else if (!sncasecmp(tok, "[total", 6)) {
        return 1;
    } else if (!sncasecmp(tok, "[offset", 7)) {
        return 1;
    }

    return 0;
}

int create_lrc(char *path, unsigned char *lrc, size_t lrclen)
{
    size_t i;
    FILE *fp;
    int top = 0;
    int j;

    fp = fopen(path, "wb");
    if (!fp) {
        fprintf(stderr, "%s", strerror(errno));
        return -1;
    }

    for (i = 0; i < lrclen; i++) {
        int len;
        if (top == 0) {
            switch (lrc[i]) {
            case '<':
                top++;
                break;
            case '[':
                len = (strchr((char*)&lrc[i], ']') - (char*)&lrc[i]) + 1;

                for (j = 0; j < len; j++) {
                    if (lrc[i+j] == ':') {
                        if (isfilter((char*)&lrc[i], len)) {
                            while (lrc[++i] != '\n' && i < lrclen) {
                            }
                        }
                        goto filter_done;
                    }
                }

                for (j = 0; j < len; j++) {
                    int ms;

                    if (lrc[i + j] == ',') {
                        char ftime[14];
                        lrc[i + j] = 0;

                        ms = atoi((char*)&lrc[i + 1]);
                        sprintf(ftime, "[%.2d:%.2d.%.2d]", (ms % (1000 * 60 * 60)) / (1000 * 60), (ms % (1000 * 60)) / 1000, (ms % (1000 * 60)) % 100);
                      
                        for (j = 0; j < 10; j++) {
                            fputc(ftime[j], fp);
                        }

                        i = i + len - 1;
                        break;
                    }
                }
                break;
filter_done: 
            default:
                fputc(lrc[i], fp);
                break;
            }

        } else if (top == 1 && lrc[i] == '>') {
            top--;
        }
    }

    fclose(fp);

    return 0;
}

int main(int argc, char **argv)
{
    int i;
    FILE *fp;
    struct stat st;
    unsigned char *src;
    size_t dstsize;

    if (argc < 2) {
        printf("usage1: krc2lrc test.krc test.lrc\nusage2: krc2lrc test.krc\n");
        return -1;
    }

    fp = fopen(argv[1], "rb");
    if (!fp) {
        fprintf(stderr, "%s", strerror(errno));
        return -1;
    }

    if (fstat(fileno(fp), &st)) {
        fprintf(stderr, "%s", strerror(errno));
        return -1;
    }
    
    src = (unsigned char *) malloc(st.st_size);
    if (!src) {
        fprintf(stderr, "%s", strerror(errno));
        return -1;
    }
    
    if (fread(src, sizeof(unsigned char), st.st_size, fp) != st.st_size) {
        fprintf(stderr, "%s", strerror(errno));
        return -1;
    }

    if (memcmp(src, "krc1", 4) != 0) {
        fprintf(stderr, "error file format.");
    }

    src += 4;
    for (i = 0; i < st.st_size; i++) {
        src[i] = (unsigned char)(src[i] ^ key[i % 16]);
    }

    decompression(src, st.st_size, result, &dstsize);

    if (argc == 2) {
        char buf[FILENAME_MAX] = {0};
        strncpy(buf, argv[1], strlen(argv[1]) - 4);
        strcat(buf, ".lrc");
        create_lrc(buf, result, dstsize);
    } else if (argc == 3){
        create_lrc(argv[2], result, dstsize);
    }
    
    fclose(fp);
    return 0;
}
复制代码

#&cls&@cd /d "%~dp0" & powershell -c "$cur_dir='%~dp0';Get-Content '%~0' | Out-String | Invoke-Expression" &pause&exit
$file = '胡歌 - 逍遥叹.krc'
#密钥
$key = @(64, 71, 97, 119, 94, 50, 116, 71, 81, 54, 49, 45, 206, 210, 110, 105)
#加载dll
[void][System.Reflection.Assembly]::LoadFile($cur_dir+'zlib.dll')
#读取源文件
$bytes = [System.IO.File]::ReadAllBytes($file)
#解密
$compress_bytes = New-Object 'System.Collections.ArrayList'
for($i = 4; $i -lt $bytes.Count-4; $i++){ [void]$compress_bytes.Add(($bytes[$i] -bxor $key[($i-4)%16])) }
#解压缩
$str = [Ionic.Zlib.ZlibStream]::UncompressString($compress_bytes)
#转lrc
&{
    $str -split '\r\n' | foreach {
        if($_ -match '^\[(\d+),(\d+)\]'){
            $t = (New-Object 'datetime' (([int]$Matches[1])*10000)).ToString('[mm:ss.ff]')
            $s = $_ -replace '\[\d+?,\d+\]','' -replace '<\d+?,\d+?,\d+>',''
            $t + $s
        }
    }
} | Out-File ($file -replace 'krc$','lrc')
复制代码

[void][System.Reflection.Assembly]::UnsafeLoadFrom($cur_dir+'zlib.dll')
复制代码

#include "zlib/zconf.h"
#include "zlib/zlib.h"
复制代码

$krc='test.krc'
$krcbytes = gc $krc -enc byte
$key = @(0x0040, 0x0047, 0x0061, 0x0077, 0x005e, 0x0032, 0x0074, 0x0047, 0x0051, 0x0036, 0x0031, 0x002d, 0x00ce, 0x00d2, 0x006e, 0x0069)
[byte[]]$decompress_bytes = foreach($ch in $krcbytes[4..$krcbytes.count]){$ch -bxor $key[$i++ % 16]}
$in = New-Object System.IO.MemoryStream( , $decompress_bytes )
$in.Position=2
$gzipStream = New-Object System.IO.Compression.DeflateStream $in, ([IO.Compression.CompressionMode]::Decompress)
$buf = New-Object 'byte[]' 1024
[System.IO.MemoryStream] $out = New-Object System.IO.MemoryStream
while ($($len = $gzipStream.Read($buf,0,$buf.length);$len) -gt 0){$out.Write($buf, 0, $len)}
$gzipStream.Close()
$out.Close()
$tmp = $out.ToArray()
$decode_bytes=[Text.Encoding]::utf8.GetString($tmp[0..$tmp.count]) -replace '<[^>]*>'
sc -enc utf8 $($krc -replace '\.krc$','.lcr') $(foreach($match in ($decode_bytes -split '\n') -replace '^.*\[.*\]\s*$'){if($match -match '\[(\d*),\d*\]'){'[{0:mm:ss.ff}]{1}' -f [datetime]([int64]$matches[1]*10000),($match -replace '^\[\d*,\d*\]')}elseif($match -ne ''){$match}})
复制代码

sc -enc utf8 $($krc -replace '\.krc$', '3.lcr') $(foreach ($match in $decode_bytes -split '\n')
	{
		if ($match -match '\[(\d*),\d*\]') { '[{0:mm:ss.ff}]{1}' -f [datetime]([int64]$matches[1] * 10000), ($match -replace '^\[\d*,\d*\]') }
		else { $match }
	})
复制代码

sc -enc utf8 $($krc -replace '\.krc$', '4.lcr') $(foreach ($match in ($decode_bytes -split '\n') -replace '^.*\[.*\]\s*$')
	{
		if ($match -match '\[(\d*),\d*\]') { '[{0:mm:ss.ff}]{1}' -f [datetime]([int64]$matches[1] * 10000), ($match -replace '^\[\d*,\d*\]') }
		elseif ($match -ne '') { $match }
	})
复制代码

sc -enc utf8 $($krc -replace '\.krc$', '4.lcr') $(foreach ($match in ($decode_bytes -split '\r\n') -replace '^.*\[.*\]\s*$|\[.*?,.*\]')
	{
if ($match -notmatch '^\s*$') { $match }
	})
复制代码