一种基于QR分解的图像脆弱水印算法实现

Matlab实现一种基于QR分解的图片脆弱水印算法，该算法能敏感图像变动与修改，具有一定的加密性。可以供相关人员参考学习。Matlab版本2014a，可直接运行。

%图像加水印以及提取验证过程，未加攻击
C=imread（‘Lena.bmp‘）;
k=99;
L1=30;
aa=80;
%读取载体图像
%嵌入消息，使用函数lsbRhide
[C_MC_C]=shuiyinHide（CkL1aa）;

%将载密图像保存到Lena_R.bmp中
imwrite（C_M‘Lena_R1.bmp‘‘bmp‘）;
C_Y=imread（‘Lena_R1.bmp‘）;
%提取消息，使用函数lsbRget
[SY]=shuiyinGet（C_YkL1aa）;
if isequal（SY）
    （‘未被攻击‘）
else
    （‘已被攻击‘）
end

%结果展示
subplot（121）;imshow（C）;title（‘原图像‘‘FontSize‘10）;
subplot（122）;imshow（C_M）;title（‘加水印图像‘‘FontSize‘10）;

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

     文件        519  2018-01-08 15:15  图像隐藏\case1.m

     文件        679  2018-01-10 10:22  图像隐藏\case2.m

     文件        625  2018-01-10 09:06  图像隐藏\case3.m

     文件        573  2018-01-10 09:18  图像隐藏\case4.m

     文件      32090  2017-08-10 10:34  图像隐藏\hui.bmp

     文件     263222  2018-01-03 15:50  图像隐藏\Lena.bmp

     文件     263222  2018-01-10 10:23  图像隐藏\Lena_R1.bmp

     文件     263222  2018-01-08 16:41  图像隐藏\Lena_R1.jpeg

     文件      30791  2018-01-10 09:12  图像隐藏\Lena_R1.jpg

     文件      30791  2018-01-10 10:23  图像隐藏\Lena_R2.jpg

     文件         10  2018-01-01 23:53  图像隐藏\message.txt

     文件        337  2018-01-08 15:10  图像隐藏\miKey.m

     文件         10  2018-01-01 23:56  图像隐藏\secret.txt

     文件        537  2018-01-08 15:13  图像隐藏\shuiyinGet.m

     文件        803  2018-01-08 15:16  图像隐藏\shuiyinHide.m

     文件        675  2018-01-08 15:26  图像隐藏\Untitled.asv

     目录          0  2018-01-10 09:18  图像隐藏

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

               888106                    17