php實現(xiàn)的簡單壓縮英文字符串的代碼
更新時間:2008年04月24日 19:28:45 作者:
一直在找壓縮字符串的算法,
不知道是不是關(guān)鍵詞選擇的不對,
找不到適合的,自己寫了一對連續(xù)字符壓縮,(如 vvvv -> 4v)
不過實用效果不太好(壓縮比低,效率卻不高),
暫且丟上來曬曬吧
PHP,適應(yīng)于上帖簡單加密后的密文
<?php
//replacement來自上個版本的加密替換
function compress_func($match) {return strlen($match[0]).$match[0]{0};}
function uncompress_func($match) {return str_repeat($match[2], $match[1]);}
function compress($str) {
$i = 0;
$pattern = array();
while(isset($replacement{$i})) array_push($pattern, "/".$replacement{$i++}."{2,}/");
return preg_replace_callback($pattern, "compress_func", $str);
}
function uncompress($str) {
return preg_replace_callback("/(d+)(w)/", "uncompress_func", $str);
}
?>
AWK,通用格式
#!/bin/awk
function compress(str, _ARGVEND_, str_out, str_len, i, s, l) {
str_out = "";
str_len = length(str);
s = "";
l = 1;
for(i =1; i <= str_len; i++) {
if(substr(str, i, 1) == s) l++;
else {
if(s != "") {
if(l > 1) str_out=str_out""l
str_out=str_out""s;
}
s = substr(str, i, 1);
l = 1;
}
}
return str_out;
}
function uncompress(str, _ARGVEND_, str_out, str_len, i, c) {
str_out = "";
str_len = length(str);
for(i =1; i <= str_len; i++) {
c = 0;
while(substr(str, i, 1)~/[0-9]/) {
c = c*10+substr(str, i, 1);
i++;
}
if(c < 1) c = 1;
while(c--) str_out = str_out""substr(str, i, 1);
}
return str_out;
}
復(fù)制代碼 代碼如下:
<?php
//replacement來自上個版本的加密替換
function compress_func($match) {return strlen($match[0]).$match[0]{0};}
function uncompress_func($match) {return str_repeat($match[2], $match[1]);}
function compress($str) {
$i = 0;
$pattern = array();
while(isset($replacement{$i})) array_push($pattern, "/".$replacement{$i++}."{2,}/");
return preg_replace_callback($pattern, "compress_func", $str);
}
function uncompress($str) {
return preg_replace_callback("/(d+)(w)/", "uncompress_func", $str);
}
?>
AWK,通用格式
復(fù)制代碼 代碼如下:
#!/bin/awk
function compress(str, _ARGVEND_, str_out, str_len, i, s, l) {
str_out = "";
str_len = length(str);
s = "";
l = 1;
for(i =1; i <= str_len; i++) {
if(substr(str, i, 1) == s) l++;
else {
if(s != "") {
if(l > 1) str_out=str_out""l
str_out=str_out""s;
}
s = substr(str, i, 1);
l = 1;
}
}
return str_out;
}
function uncompress(str, _ARGVEND_, str_out, str_len, i, c) {
str_out = "";
str_len = length(str);
for(i =1; i <= str_len; i++) {
c = 0;
while(substr(str, i, 1)~/[0-9]/) {
c = c*10+substr(str, i, 1);
i++;
}
if(c < 1) c = 1;
while(c--) str_out = str_out""substr(str, i, 1);
}
return str_out;
}
相關(guān)文章
Laravel執(zhí)行migrate命令提示:No such file or directory的解決方法
這篇文章主要介紹了Laravel執(zhí)行migrate命令提示:No such file or directory的解決方法,分析了執(zhí)行migrate命令出現(xiàn)錯誤的原因與相關(guān)的解決方法,需要的朋友可以參考下2016-03-03PHP使用Alexa API獲取網(wǎng)站的Alexa排名例子
這篇文章主要介紹了PHP使用Alexa API獲取網(wǎng)站的Alexa排名例子,需要的朋友可以參考下2014-06-06tp5實現(xiàn)微信小程序多圖片上傳到服務(wù)器功能
這最近在做一個教育類的小商城的微信小程序,用到了上傳多個圖片文件到服務(wù)器端。下面腳本之家小編給大家?guī)砹藅p5實現(xiàn)微信小程序多圖片上傳到服務(wù)器的方法,需要的朋友可以參考下2018-07-07PHP實現(xiàn)QQ、微信和支付寶三合一收款碼實例代碼
這篇文章主要給大家介紹了關(guān)于利用PHP如何實現(xiàn)QQ、微信和支付寶三合一收款碼的相關(guān)資料,文中通過示例代碼介紹的非常詳細,對大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價值,需要的朋友們下面隨著小編來一起學(xué)習(xí)學(xué)習(xí)吧。2018-02-02laravel 實現(xiàn)根據(jù)字段不同值做不同查詢
今天小編就為大家分享一篇laravel 實現(xiàn)根據(jù)字段不同值做不同查詢,具有很好的參考價值,希望對大家有所幫助。一起跟隨小編過來看看吧2019-10-10php 調(diào)用百度sms來發(fā)送短信的實現(xiàn)示例
這篇文章主要介紹了php 調(diào)用百度sms來發(fā)送短信的實現(xiàn)示例,小編覺得挺不錯的,現(xiàn)在分享給大家,也給大家做個參考。一起跟隨小編過來看看吧2018-11-11