变量名替换

bikkuri 发表于 2023-04-22 11:46

本帖最后由 bikkuri 于 2023-04-23 11:27 编辑

大家好！向大家请教一个问题。
有这样一个小程序，里面的变量名是由下划线开头后面接了6位字母和数字组合而成。
# cat a.sh
#!/bin/bash
uuid=$(ls -l /dev/disk/by-uuid 2>/dev/null|grep -oPm1 '(?<=[[:xdigit:]]{8}(-[[:xdigit:]]{4}){3}-)[[:xdigit:]]{12}'|sed -r 's/.{2}/&:/g;s/.$//')
mac=$(ifconfig $(/sbin/route -n|awk '{if($1=="0.0.0.0")print$NF}') 2>/dev/null|grep -oEm1 '([[:xdigit:]]{1,2}:){5}[[:xdigit:]]{1,2}')
awk -v _l1ll11=$uuid -v _ll11ll=$mac 'function _11ll11(_11l111,_111lll,_l1llll,_ll1l1l,_1111ll,_l1l111,_llllll){if(_11l111 ~ /^0*$/){_ll1l1l=length(_11l111);_111lll=0;for(_1111ll=1;_1111ll<=_ll1l1l;_1111ll++){_llllll=substr(_11l111,_1111ll,1);if((_l1l111=index("01234567",_llllll))>0)_l1l111--;_111lll=_111lll*8+_l1l111}}else if(_11l111 ~ /^0[[:xdigit:]]+/){_11l111=substr(_11l111,3);_ll1l1l=length(_11l111);_111lll=0;for(_1111ll=1;_1111ll<=_ll1l1l;_1111ll++){_llllll=substr(_11l111,_1111ll,1);_llllll=tolower(_llllll);if((_l1l111=index("0123456789",_llllll))>0)_l1l111--;else if((_l1l111=index("abcdef",_llllll))>0) _l1l111+=9;_111lll=_111lll*16+_l1l111}}else if(_11l111 ~ /^[-+]?(+([.]*(+)?)?|([.]+([-+]?+)?))$/){_111lll=_11l111+0}else _111lll="NOT-A-NUMBER";return _111lll}BEGIN{_1l11ll=_l1ll11;split(_l1ll11,_l11lll,":");split(_ll11ll,_l111l1,":");for(_111l1l=length(_l11lll);_111l1l>0;_111l1l--){_l11111=_11ll11(sprintf("%s%s","0x",_l11lll));_l1111l=_11ll11(sprintf("%s%s","0x",_l111l1));if(_l11111>_l1111l){_1l11ll=_l1ll11;break}else if(_l11111<_l1111l){_1l11ll=_ll11ll;break}}print _1l11ll}'
# ./a.sh
00:10:18:B1:FA:EF
现在想把这个程序中的变量名中的数字1改为数字5，字母l改为字母S。
# echo $(grep -oP '_[\d|\w]{6}' a.sh)
_l1ll11 _ll11ll _11ll11 _11l111 _111lll _l1llll _ll1l1l _1111ll _l1l111 _llllll _11l111 _ll1l1l _11l111 _111lll _1111ll _1111ll _ll1l1l _1111ll _llllll _11l111 _1111ll _l1l111 _llllll _l1l111 _111lll _111lll _l1l111 _11l111 _11l111 _11l111 _ll1l1l _11l111 _111lll _1111ll _1111ll _ll1l1l _1111ll _llllll _11l111 _1111ll _llllll _llllll _l1l111 _llllll _l1l111 _l1l111 _llllll _l1l111 _111lll _111lll _l1l111 _11l111 _111lll _11l111 _111lll _111lll _1l11ll _l1ll11 _l1ll11 _l11lll _ll11ll _l111l1 _111l1l _l11lll _111l1l _111l1l _l11111 _11ll11 _l11lll _111l1l _l1111l _11ll11 _l111l1 _111l1l _l11111 _l1111l _1l11ll _l1ll11 _l11111 _l1111l _1l11ll _ll11ll _1l11ll
# echo $(grep -oP '_[\d|\w]{6}' a.sh)|sed 's/1/5/g;s/l/S/g'
_S5SS55 _SS55SS _55SS55 _55S555 _555SSS _S5SSSS _SS5S5S _5555SS _S5S555 _SSSSSS _55S555 _SS5S5S _55S555 _555SSS _5555SS _5555SS _SS5S5S _5555SS _SSSSSS _55S555 _5555SS _S5S555 _SSSSSS _S5S555 _555SSS _555SSS _S5S555 _55S555 _55S555 _55S555 _SS5S5S _55S555 _555SSS _5555SS _5555SS _SS5S5S _5555SS _SSSSSS _55S555 _5555SS _SSSSSS _SSSSSS _S5S555 _SSSSSS _S5S555 _S5S555 _SSSSSS _S5S555 _555SSS _555SSS _S5S555 _55S555 _555SSS _55S555 _555SSS _555SSS _5S55SS _S5SS55 _S5SS55 _S55SSS _SS55SS _S555S5 _555S5S _S55SSS _555S5S _555S5S _S55555 _55SS55 _S55SSS _555S5S _S5555S _55SS55 _S555S5 _555S5S _S55555 _S5555S _5S55SS _S5SS55 _S55555 _S5555S _5S55SS _SS55SS _5S55SS
#
请问应该如何改才能只修改原来程序中的变量名而不影响其他部分？

本友会机友会摄友会 发表于 2023-04-22 15:04

本友会机友会摄友会 发表于 2023-04-22 15:17

bikkuri 发表于 2023-04-23 11:06

本帖最后由 bikkuri 于 2023-04-24 08:29 编辑

# cat a.sh
#!/bin/bash
uuid=$(ls -l /dev/disk/by-uuid 2>/dev/null|grep -oPm1 '(?<=[[:xdigit:]]{8}(-[[:xdigit:]]{4}){3}-)[[:xdigit:]]{12}'|sed -r 's/.{2}/&:/g;s/.$//')
mac=$(ifconfig $(/sbin/route -n|awk '{if($1=="0.0.0.0")print$NF}') 2>/dev/null|grep -oEm1 '([[:xdigit:]]{1,2}:){5}[[:xdigit:]]{1,2}')
awk -v _l1ll11=$uuid -v _ll11ll=$mac 'function _11ll11(_11l111,_111lll,_l1llll,_ll1l1l,_1111ll,_l1l111,_llllll){if(_11l111 ~ /^0*$/){_ll1l1l=length(_11l111);_111lll=0;for(_1111ll=1;_1111ll<=_ll1l1l;_1111ll++){_llllll=substr(_11l111,_1111ll,1);if((_l1l111=index("01234567",_llllll))>0)_l1l111--;_111lll=_111lll*8+_l1l111}}else if(_11l111 ~ /^0[[:xdigit:]]+/){_11l111=substr(_11l111,3);_ll1l1l=length(_11l111);_111lll=0;for(_1111ll=1;_1111ll<=_ll1l1l;_1111ll++){_llllll=substr(_11l111,_1111ll,1);_llllll=tolower(_llllll);if((_l1l111=index("0123456789",_llllll))>0)_l1l111--;else if((_l1l111=index("abcdef",_llllll))>0) _l1l111+=9;_111lll=_111lll*16+_l1l111}}else if(_11l111 ~ /^[-+]?(+([.]*(+)?)?|([.]+([-+]?+)?))$/){_111lll=_11l111+0}else _111lll="NOT-A-NUMBER";return _111lll}BEGIN{_1l11ll=_l1ll11;split(_l1ll11,_l11lll,":");split(_ll11ll,_l111l1,":");for(_111l1l=length(_l11lll);_111l1l>0;_111l1l--){_l11111=_11ll11(sprintf("%s%s","0x",_l11lll));_l1111l=_11ll11(sprintf("%s%s","0x",_l111l1));if(_l11111>_l1111l){_1l11ll=_l1ll11;break}else if(_l11111<_l1111l){_1l11ll=_ll11ll;break}}print _1l11ll}'
#
# cat a.sh|awk -v o="5S" '{split(o,f,"");split($0,a,/_+/); i=0; while(match($0,/_+/)){i++;b=substr($0,RSTART,RLENGTH); gsub("1",f,b);gsub("l",f,b);c=ab;$0=substr($0,RSTART+RLENGTH)};for(j=1;j<i+1;j++)printf("%s", c);print $0}'> b.sh
#
# cat b.sh
#!/bin/bash
uuid=$(ls -l /dev/disk/by-uuid 2>/dev/null|grep -oPm1 '(?<=[[:xdigit:]]{8}(-[[:xdigit:]]{4}){3}-)[[:xdigit:]]{12}'|sed -r 's/.{2}/&:/g;s/.$//')
mac=$(ifconfig $(/sbin/route -n|awk '{if($1=="0.0.0.0")print$NF}') 2>/dev/null|grep -oEm1 '([[:xdigit:]]{1,2}:){5}[[:xdigit:]]{1,2}')
awk -v _S5SS55=$uuid -v _SS55SS=$mac 'function _55SS55(_55S555,_555SSS,_S5SSSS,_SS5S5S,_5555SS,_S5S555,_SSSSSS){if(_55S555 ~ /^0*$/){_SS5S5S=length(_55S555);_555SSS=0;for(_5555SS=1;_5555SS<=_SS5S5S;_5555SS++){_SSSSSS=substr(_55S555,_5555SS,1);if((_S5S555=index("01234567",_SSSSSS))>0)_S5S555--;_555SSS=_555SSS*8+_S5S555}}else if(_55S555 ~ /^0[[:xdigit:]]+/){_55S555=substr(_55S555,3);_SS5S5S=length(_55S555);_555SSS=0;for(_5555SS=1;_5555SS<=_SS5S5S;_5555SS++){_SSSSSS=substr(_55S555,_5555SS,1);_SSSSSS=tolower(_SSSSSS);if((_S5S555=index("0123456789",_SSSSSS))>0)_S5S555--;else if((_S5S555=index("abcdef",_SSSSSS))>0) _S5S555+=9;_555SSS=_555SSS*16+_S5S555}}else if(_55S555 ~ /^[-+]?(+([.]*(+)?)?|([.]+([-+]?+)?))$/){_555SSS=_55S555+0}else _555SSS="NOT-A-NUMBER";return _555SSS}BEGIN{_5S55SS=_S5SS55;split(_S5SS55,_S55SSS,":");split(_SS55SS,_S555S5,":");for(_555S5S=length(_S55SSS);_555S5S>0;_555S5S--){_S55555=_55SS55(sprintf("%s%s","0x",_S55SSS));_S5555S=_55SS55(sprintf("%s%s","0x",_S555S5));if(_S55555>_S5555S){_5S55SS=_S5SS55;break}else if(_S55555<_S5555S){_5S55SS=_SS55SS;break}}print _5S55SS}'
#
# ./a.sh
00:10:18:B1:FA:EF
#
# ./b.sh
00:10:18:B1:FA:EF
#

baby_神 发表于 2023-04-24 09:26

牛逼，变量名不能好好起个名字？

页: [1]

Chinaunix's Archiver

变量名替换