LSB信息隐藏源程序

基于LSB信息隐藏源程序，可有效隐藏文本信息！

clc;
close all;
clear;
A=imread（‘lena.jpg‘）;
B=A;
message=‘HelloI am a little sister! ‘;
m=length（message）;
imshow（A）
title（‘原始图片‘）;
n=size（A）;
k=1;
% LSB 算法:
for i=1:n（1）
    for j=1:n（2）
        if k<=m 
	        %如果消息输入完成则为0
            h=bitget（double（message（k））8:-1:1）;
        else
            h=[00000000];
        end
        c=bitget（A（ij）8:-1:1）;
        if mod（j8） == 0 
            p=8;
        else
            p=mod（j8）;
        end
        v=0;
        for q=1:7
            v=xor（vc（q））;
        end
        v=xor（v h（p） ）;
        B（ij）=bitset（A（ij）1v）;%对A（ij）的第一位置数
        if mod（j8） == 0  
            k=k+1;
        end
    end
           %end LSB
end
figureimshow（B）
imwrite（B‘new.jpg‘）;
title（‘隐藏信息的图片‘）;

%double（B（1:））-double（A（1:））

% read message:
out=char;
tmp=0  ;
t=1;
for i=1:n（1）
   for j=1:n（2）
       c=bitget（B（ij）8:-1:1）;
       v=0;
       for q=1:8
           v=xor（vc（q））;
       end
       if mod（j8）==0
           p=1;
       else
           p=9-mod（j8）;
       end
       tmp=bitset（tmppv）;
       if mod（j8）==0
           out（t）=char（tmp）;
           t=t+1;
           tmp=0;
       end
   end
end
out

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      11091  2010-10-21 23:38  lsb\lena.jpg

     文件       1276  2010-11-20 21:46  lsb\LSB.m

     文件      10582  2010-11-19 21:02  lsb\new.jpg

     目录          0  2010-11-20 21:46  lsb

----------- ---------  ---------- -----  ----

                22949                    4