圖片嵌入-大容量的信息隱藏算法

分享一下最近看到的一個(gè)關(guān)于圖片嵌入隱藏的算法:

“大容量的信息隱藏算法",這是一種基于空間域的自適應(yīng)多平面位的信息隱藏算法期吓。該算法計(jì)算復(fù)雜度低、信息隱藏量大。且有實(shí)驗(yàn)表明在不影響圖像視覺(jué)效果的前提下讨勤,其信息隱藏量比LSB算法大箭跳,并具有更高的安全性。該算法的主要思想是對(duì)每個(gè)像素點(diǎn)進(jìn)行判斷潭千,根據(jù)HVS的特性谱姓,在最高非0有效位后的指定位(y)開(kāi)始嵌入隱藏信息,嵌入到另一個(gè)指定位(z)為止刨晴。

下面直接貼上MATLAB代碼和實(shí)驗(yàn)結(jié)果:

(1)?main_ImgEmbed.m

clc;

clearall;

closeall;

warningoffall;

yr=4;//論文中實(shí)驗(yàn)得到

yg=5;

yb=3;

Img=imread('lena.jpg');

figure;imshow(Img,[]);title('原圖');

Img=double(Img);

ImgR=Img(:,:,1);

ImgG=Img(:,:,2);

ImgB=Img(:,:,3);

Imgmark=imread('ImgEmbed.jpg');

Imgmark=double(Imgmark);

figure;imshow(Imgmark,[]);title('ImgEmbed');

[markm,markn]=size(Imgmark);

Imgmarkline = Imgmark(:);%二維數(shù)組轉(zhuǎn)成一列

Imgmarklinebin=zeros(markm*markn*8,1);%轉(zhuǎn)化為二進(jìn)制

forii=1:markm*markn

[Imgmarklinebin(8*ii-7),Imgmarklinebin(8*ii-6),Imgmarklinebin(8*ii-5),Imgmarklinebin(8*ii-4),Imgmarklinebin(8*ii-3),...

Imgmarklinebin(8*ii-2),Imgmarklinebin(8*ii-1),Imgmarklinebin(8*ii)]=Find8bits(Imgmarkline(ii));

end

%%

%嵌入

%對(duì)于紅色通道

embedNumsed=0;%已嵌入個(gè)數(shù)

[M,N,Z]=size(Img);

y=zeros(8,1);

flag=0;%輔助跳出的標(biāo)志

ImgRline=ImgR(:);%轉(zhuǎn)換為一列

ImgRlineNew=ImgRline;%嵌入后

forii=1:M*N

ifflag==1;%跳出外層循環(huán)

break;

end

[y(8),y(7),y(6),y(5),y(4),y(3),y(2),y(1)]=Find8bits(ImgRline(ii));

posNzreo=FindNotZero(y(8),y(7),y(6),y(5),y(4),y(3),y(2),y(1));

embedNums=posNzreo-yr;%能嵌入的個(gè)數(shù)

ifembedNums>0%符合嵌入條件

forjj=1:embedNums

embedNumsed=embedNumsed+1;%已嵌入個(gè)數(shù)

ifembedNumsed>markm*markn*8%嵌入完成

flag=1;%設(shè)置標(biāo)識(shí)屉来,使外層循環(huán)也跳出

break;

end

y(jj)=Imgmarklinebin(embedNumsed);%嵌入

end

end

ImgRlineNew(ii)=bin2dec_trans(y(8),y(7),y(6),y(5),y(4),y(3),y(2),y(1));%嵌入后的

end

ImgR2=reshape(ImgRlineNew,[M,N]);

%對(duì)于G通道

ImgGline=ImgG(:);%轉(zhuǎn)換為一列

ImgGlineNew=ImgGline;%嵌入后

forii=1:M*N

ifflag==1;%跳出外層循環(huán)

break;

end

[y(8),y(7),y(6),y(5),y(4),y(3),y(2),y(1)]=Find8bits(ImgGline(ii));

posNzreo=FindNotZero(y(8),y(7),y(6),y(5),y(4),y(3),y(2),y(1));

embedNums=posNzreo-yg;%能嵌入的個(gè)數(shù)

ifembedNums>0%符合嵌入條件

forjj=1:embedNums

embedNumsed=embedNumsed+1;%已嵌入個(gè)數(shù)

ifembedNumsed>markm*markn*8%嵌入完成

flag=1;%設(shè)置標(biāo)識(shí),使外層循環(huán)也跳出

break;

end

y(jj)=Imgmarklinebin(embedNumsed);%嵌入

end

end

ImgGlineNew(ii)=bin2dec_trans(y(8),y(7),y(6),y(5),y(4),y(3),y(2),y(1));%嵌入后的

end

ImgG2=reshape(ImgGlineNew,[M,N]);

%對(duì)于B通道

ImgBline=ImgB(:);%轉(zhuǎn)換為一列

ImgBlineNew=ImgBline;%嵌入后

forii=1:M*N

ifflag==1;%跳出外層循環(huán)

break;

end

[y(8),y(7),y(6),y(5),y(4),y(3),y(2),y(1)]=Find8bits(ImgBline(ii));

posNzreo=FindNotZero(y(8),y(7),y(6),y(5),y(4),y(3),y(2),y(1));

embedNums=posNzreo-yb;%能嵌入的個(gè)數(shù)

ifembedNums>0%符合嵌入條件

forjj=1:embedNums

embedNumsed=embedNumsed+1;%已嵌入個(gè)數(shù)

ifembedNumsed>markm*markn*8%嵌入完成

flag=1;%設(shè)置標(biāo)識(shí)狈癞,使外層循環(huán)也跳出

break;

end

y(jj)=Imgmarklinebin(embedNumsed);%嵌入

end

end

ImgBlineNew(ii)=bin2dec_trans(y(8),y(7),y(6),y(5),y(4),y(3),y(2),y(1));%嵌入后的

end

ImgB2=reshape(ImgBlineNew,[M,N]);

ImgNew=zeros(M,N,Z);

ImgNew(:,:,1)=ImgR2;

ImgNew(:,:,2)=ImgG2;

ImgNew(:,:,3)=ImgB2;

figure;imshow(uint8(ImgNew),[]);title('嵌入后的RGB圖');

% imwrite(uint8(ImgNew),'介質(zhì)圖片_嵌入圖像后.jpg'); %保存圖片

%%

%提取嵌入圖像

flag=0;

Imgmark_extractlinebin=zeros(markm*markn*8,1);

extractNumsed=0;%已提取個(gè)數(shù)

% R通道

ImgRline2=ImgR2(:);%轉(zhuǎn)換為一列

forii=1:M*N

ifflag==1;%跳出外層循環(huán)

break;

end

[y(8),y(7),y(6),y(5),y(4),y(3),y(2),y(1)]=Find8bits(ImgRline2(ii));

posNzreo=FindNotZero(y(8),y(7),y(6),y(5),y(4),y(3),y(2),y(1));

embedNums=posNzreo-yr;%已嵌入的個(gè)數(shù)

ifembedNums>0%符合嵌入條件

forjj=1:embedNums

extractNumsed=extractNumsed+1;%已提取個(gè)數(shù)

ifextractNumsed>markm*markn*8%提取完成

flag=1;%設(shè)置標(biāo)識(shí)茄靠,使外層循環(huán)也跳出

break;

end

Imgmark_extractlinebin(extractNumsed)=y(jj);%提取

end

end

end

% G通道

ImgGline2=ImgG2(:);%轉(zhuǎn)換為一列

forii=1:M*N

ifflag==1;%跳出外層循環(huán)

break;

end

[y(8),y(7),y(6),y(5),y(4),y(3),y(2),y(1)]=Find8bits(ImgGline2(ii));

posNzreo=FindNotZero(y(8),y(7),y(6),y(5),y(4),y(3),y(2),y(1));

embedNums=posNzreo-yg;%已嵌入的個(gè)數(shù)

ifembedNums>0%符合嵌入條件

forjj=1:embedNums

extractNumsed=extractNumsed+1;%已提取個(gè)數(shù)

ifextractNumsed>markm*markn*8%提取完成

flag=1;%設(shè)置標(biāo)識(shí),使外層循環(huán)也跳出

break;

end

Imgmark_extractlinebin(extractNumsed)=y(jj);%提取

end

end

end

% G通道

ImgBline2=ImgB2(:);%轉(zhuǎn)換為一列

forii=1:M*N

ifflag==1;%跳出外層循環(huán)

break;

end

[y(8),y(7),y(6),y(5),y(4),y(3),y(2),y(1)]=Find8bits(ImgBline2(ii));

posNzreo=FindNotZero(y(8),y(7),y(6),y(5),y(4),y(3),y(2),y(1));

embedNums=posNzreo-yb;%已嵌入的個(gè)數(shù)

ifembedNums>0%符合嵌入條件

forjj=1:embedNums

extractNumsed=extractNumsed+1;%已提取個(gè)數(shù)

ifextractNumsed>markm*markn*8%提取完成

flag=1;%設(shè)置標(biāo)識(shí)蝶桶,使外層循環(huán)也跳出

break;

end

Imgmark_extractlinebin(extractNumsed)=y(jj);%提取

end

end

end

%二進(jìn)制轉(zhuǎn)十進(jìn)制

Imgmarklinedec=zeros(markm*markn,1);%轉(zhuǎn)化為十進(jìn)制

forii=1:markm*markn

Imgmarklinedec(ii)=bin2dec_trans(Imgmark_extractlinebin(8*ii-7),Imgmark_extractlinebin(8*ii-6),Imgmark_extractlinebin(8*ii-5),Imgmark_extractlinebin(8*ii-4),...

Imgmark_extractlinebin(8*ii-3),Imgmark_extractlinebin(8*ii-2),Imgmark_extractlinebin(8*ii-1),Imgmark_extractlinebin(8*ii));

end

Imgmarkextract=reshape(Imgmarklinedec,[markm,markn]);

figure;imshow(Imgmarkextract,[]);title('提取的嵌入圖片');

% imwrite(uint8(Imgmarkextract),'待嵌入圖片_gray_提取結(jié)果.jpg'); %保存圖片

%檢查提取的水印和原水印的區(qū)別

difmarked=Imgmarkextract-Imgmark;%做差

%發(fā)現(xiàn)差為0慨绳,即說(shuō)明完全一致,提取正確

(2)Find8bits.m

function[y7,y6,y5,y4,y3,y2,y1,y0]=Find8bits(Data)

y0=mod(Data,2);

y7=fix(Data/128);Data=Data-y7*128;

y6=fix(Data/64); Data=Data-y6*64;

y5=fix(Data/32); Data=Data-y5*32;

y4=fix(Data/16); Data=Data-y4*16;

y3=fix(Data/8);? Data=Data-y3*8;

y2=fix(Data/4);? Data=Data-y2*4;

y1=fix(Data/2);? Data=Data-y1*2;

end

(3)bin2dec_trans.m

%二進(jìn)制轉(zhuǎn)十進(jìn)制

functionData=bin2dec_trans(y7,y6,y5,y4,y3,y2,y1,y0)

Data=y7*128+y6*64+y5*32+y4*16+y3*8+y2*4+y1*2+y0;

end

(4)FindNotZero.m

%找出第一個(gè)不為零的數(shù)位 從最高位(第八位)開(kāi)始

functionposNzreo=FindNotZero(y7,y6,y5,y4,y3,y2,y1,y0)

ify7~=0????? posNzreo=8;

elseify6~=0? posNzreo=7;

elseify5~=0? posNzreo=6;

elseify4~=0? posNzreo=5;

elseify3~=0? posNzreo=4;

elseify2~=0? posNzreo=3;

elseify1~=0? posNzreo=2;

elseposNzreo=1;

end

end

實(shí)驗(yàn)結(jié)果如下:

(1)原圖

(2)要嵌入隱藏的圖片

(3)嵌入隱藏圖片后的介質(zhì)圖像

(4)提取的嵌入圖片

整個(gè)工程代碼下載請(qǐng)到:http://download.csdn.net/download/tianma5/9508467

才疏學(xué)淺真竖,多多指教脐雪。

最后編輯于
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末,一起剝皮案震驚了整個(gè)濱河市疼邀,隨后出現(xiàn)的幾起案子喂江,更是在濱河造成了極大的恐慌,老刑警劉巖旁振,帶你破解...
    沈念sama閱讀 217,185評(píng)論 6 503
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件,死亡現(xiàn)場(chǎng)離奇詭異涨岁,居然都是意外死亡拐袜,警方通過(guò)查閱死者的電腦和手機(jī),發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 92,652評(píng)論 3 393
  • 文/潘曉璐 我一進(jìn)店門(mén)梢薪,熙熙樓的掌柜王于貴愁眉苦臉地迎上來(lái)蹬铺,“玉大人,你說(shuō)我怎么就攤上這事秉撇√鹋剩” “怎么了?”我有些...
    開(kāi)封第一講書(shū)人閱讀 163,524評(píng)論 0 353
  • 文/不壞的土叔 我叫張陵琐馆,是天一觀的道長(zhǎng)规阀。 經(jīng)常有香客問(wèn)我,道長(zhǎng)瘦麸,這世上最難降的妖魔是什么谁撼? 我笑而不...
    開(kāi)封第一講書(shū)人閱讀 58,339評(píng)論 1 293
  • 正文 為了忘掉前任,我火速辦了婚禮滋饲,結(jié)果婚禮上厉碟,老公的妹妹穿的比我還像新娘喊巍。我一直安慰自己,他們只是感情好箍鼓,可當(dāng)我...
    茶點(diǎn)故事閱讀 67,387評(píng)論 6 391
  • 文/花漫 我一把揭開(kāi)白布崭参。 她就那樣靜靜地躺著,像睡著了一般款咖。 火紅的嫁衣襯著肌膚如雪何暮。 梳的紋絲不亂的頭發(fā)上,一...
    開(kāi)封第一講書(shū)人閱讀 51,287評(píng)論 1 301
  • 那天之剧,我揣著相機(jī)與錄音郭卫,去河邊找鬼。 笑死背稼,一個(gè)胖子當(dāng)著我的面吹牛贰军,可吹牛的內(nèi)容都是我干的。 我是一名探鬼主播蟹肘,決...
    沈念sama閱讀 40,130評(píng)論 3 418
  • 文/蒼蘭香墨 我猛地睜開(kāi)眼词疼,長(zhǎng)吁一口氣:“原來(lái)是場(chǎng)噩夢(mèng)啊……” “哼!你這毒婦竟也來(lái)了帘腹?” 一聲冷哼從身側(cè)響起贰盗,我...
    開(kāi)封第一講書(shū)人閱讀 38,985評(píng)論 0 275
  • 序言:老撾萬(wàn)榮一對(duì)情侶失蹤,失蹤者是張志新(化名)和其女友劉穎阳欲,沒(méi)想到半個(gè)月后舵盈,有當(dāng)?shù)厝嗽跇?shù)林里發(fā)現(xiàn)了一具尸體,經(jīng)...
    沈念sama閱讀 45,420評(píng)論 1 313
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡球化,尸身上長(zhǎng)有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 37,617評(píng)論 3 334
  • 正文 我和宋清朗相戀三年秽晚,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片筒愚。...
    茶點(diǎn)故事閱讀 39,779評(píng)論 1 348
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡赴蝇,死狀恐怖,靈堂內(nèi)的尸體忽然破棺而出巢掺,到底是詐尸還是另有隱情句伶,我是刑警寧澤,帶...
    沈念sama閱讀 35,477評(píng)論 5 345
  • 正文 年R本政府宣布陆淀,位于F島的核電站考余,受9級(jí)特大地震影響,放射性物質(zhì)發(fā)生泄漏倔约。R本人自食惡果不足惜秃殉,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 41,088評(píng)論 3 328
  • 文/蒙蒙 一、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧钾军,春花似錦鳄袍、人聲如沸。這莊子的主人今日做“春日...
    開(kāi)封第一講書(shū)人閱讀 31,716評(píng)論 0 22
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽(yáng)。三九已至樱哼,卻和暖如春哀九,著一層夾襖步出監(jiān)牢的瞬間,已是汗流浹背搅幅。 一陣腳步聲響...
    開(kāi)封第一講書(shū)人閱讀 32,857評(píng)論 1 269
  • 我被黑心中介騙來(lái)泰國(guó)打工阅束, 沒(méi)想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留,地道東北人茄唐。 一個(gè)月前我還...
    沈念sama閱讀 47,876評(píng)論 2 370
  • 正文 我出身青樓息裸,卻偏偏與公主長(zhǎng)得像,于是被迫代替她去往敵國(guó)和親沪编。 傳聞我的和親對(duì)象是個(gè)殘疾皇子呼盆,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 44,700評(píng)論 2 354

推薦閱讀更多精彩內(nèi)容

  • 背景 一年多以前我在知乎上答了有關(guān)LeetCode的問(wèn)題, 分享了一些自己做題目的經(jīng)驗(yàn)。 張土汪:刷leetcod...
    土汪閱讀 12,744評(píng)論 0 33
  • 一蚁廓、實(shí)驗(yàn)?zāi)康?學(xué)習(xí)使用 weka 中的常用分類(lèi)器访圃,完成數(shù)據(jù)分類(lèi)任務(wù)。 二相嵌、實(shí)驗(yàn)內(nèi)容 了解 weka 中 explo...
    yigoh閱讀 8,527評(píng)論 5 4
  • Java經(jīng)典問(wèn)題算法大全 /*【程序1】 題目:古典問(wèn)題:有一對(duì)兔子腿时,從出生后第3個(gè)月起每個(gè)月都生一對(duì)兔子,小兔子...
    趙宇_阿特奇閱讀 1,864評(píng)論 0 2
  • 每個(gè)女生身上都有優(yōu)點(diǎn)和缺點(diǎn),并且男生可能會(huì)看的很清楚笆搓,只不過(guò)他們并不會(huì)對(duì)你說(shuō)什么性湿。其實(shí)你是不是很想知道自己被男生怎...
    寧空間塔羅屋piano閱讀 1,279評(píng)論 0 3
  • 清.石濤 荷葉五寸荷花嬌, 貼波不礙畫(huà)船搖满败, 相到薰風(fēng)四五月肤频, 也能遮卻美人腰。
    雨_蓮閱讀 96評(píng)論 0 0