[问题求助] 求同时精通Python和powershell的大神,把Py代码转成Ps

5i365

酷狗的歌词是专用的KRC格式的, 想把它转成LRC格式的, 在Github上找到了python版的工具,
很不错, 正在使用, 但是要装python, 即使打包成exe也不小, 看了下py代码, 只有七八十行, 实际处理字符串的代码也不多,
求同时精通Python和powershell的大神,把Py代码转成Ps, 非常感谢
下面有歌词解析代码的 python, java, c 语言版, 供参考


github地址:
https://github.com/veficos/krc2lrc

Python代码

# 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()
复制代码

5i365

附上老胡的 逍遥叹 酷狗歌词:
https://wss1.cn/f/7dt99g1r74w 复制链接到浏览器打开

5i365

又搜到了一段JAVA解析的代码

/**
 * 
 */
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;
	}
}
复制代码

5i365

又找到一段C解析代码, 供参考

#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;
}
复制代码

went

test.bat

#&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')
复制代码

需要zlib库,和bat放一起zlib.dll

5i365

回复 5# went


    感谢帮忙, 真没想到用ps就这么几行代码, 测试了一下,报下面的错误:

Exception calling "LoadFile" with "1" argument(s): "An attempt was made to load an assembly from a network location whi
ch would have caused the assembly to be sandboxed in previous versions of the .NET Framework. This release of the .NET
Framework does not enable CAS policy by default, so this load may be dangerous. If this load is not intended to sandbox
the assembly, please enable the loadFromRemoteSources switch. See http://go.microsoft.com/fwlink/?LinkId=155569 for mo
re information."
At line:6 char:1
+ [void][System.Reflection.Assembly]:oadFile($cur_dir+'zlib.dll')
+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : NotSpecified: ( [], MethodInvocationException
    + FullyQualifiedErrorId : NotSupportedException

Unable to find type [Ionic.Zlib.ZlibStream].
At line:13 char:8
+ $str = [Ionic.Zlib.ZlibStream]::UncompressString($compress_bytes)
+        ~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (Ionic.Zlib.ZlibStream:TypeName) [], RuntimeException
    + FullyQualifiedErrorId : TypeNotFound

请按任意键继续. . .

5i365

回复 5# went

这样也报错
    Add-Type -Path $cur_dir'zlib.dll'

went

回复 7# 5i365


    dll下载了吗,改成这样呢

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

!!!!!

5i365

回复 8# went


    请问为啥用PS就这么几行代码就搞定了呢? 太意外了, 我预想代码会少一些, 但是没想到这么少!

5i365

回复 8# went


    不过, 还是得需要一个外在的dll才行,

我在上面github页面点进去, 发现那个C版的代码里有个 编译好的exe文件, 只有100k左右, 这样一算, 都带一个附加文件, 运行效率, 肯定是C生成的exe高

但是不明白, 为什么java版的代码, 就不用别的附加文件呢

went

回复 9# 5i365


    powershell在便捷性上确实秒杀其它脚本
    参考http://www.doczj.com/doc/52a6af6f5bcfa1c7aa00b52acfc789eb172d9ea8.html

5i365

回复 11# went


    感谢分享, 实在看不懂,

要是不用dll就能搞定就好了

went

回复 10# 5i365


    c是用的zlib的静态库，不需要额外的dll,powershell不行

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

5i365

回复 13# went


    要是能把这个功能加到您的 那个coder编码工具里就好了, 以后想用coder了, 上次自己试了下, 还是没有能力把它集成到PS代码中, 集成进去后, 就不用带coder.exe了

想把coder集成到ps代码的最后位置

went

回复 14# 5i365


    真想把coder.exe放到ps里,用base64存放
    但coder.exe还是有16kb,我觉得大可不必