http://m.blog.chinaunix.net/uid-29280350-id-4717510.html
http://m.blog.chinaunix.net/uid-29280350-id-4906197.html
注：在Linux-3.0.0 到 linux-3.8.0上能够正常运行，超过3.8.13就会导致系统桌面崩溃
1.Ksplice-create
Ksplice-create用于创建补丁文件，根据用户提供的不同的更新文件，ksplice-create有三种不同的途径：
同时，ksplice-create还需要指定orig_config_dir（指定config的目录），在该目录下要有以下几个文件：
1.1配置
根据配置变量，组织make命令：
如果定义了jobs
如果定义了verbose level
make_ksplice 变量：
1
@make -f $datadir/Makefile.ksplice @kbuild_flags
如果定义了build_modules
1
KSPLICE_BUILD_MODULES=1
1.2 Revert
配置变量完成后，ksplice-create会查找linux内核代码目录下是否会存在*.KSPLICE_presrc文件，存在该类型的文件则表明在该linux内核目录下曾制作过补丁文件，因此需要先将代码恢复为原始代码。
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
my @revert_flags=("KSPLICE_MODE=revert");
Revert_orig()
Find出*.KSPLICE_presrc的文件，将之恢复为原始文件
执行命令：make -rR -f Makefile.ksplice KSPLICE_MODE=revert
进入Makefile.ksplice文件：
Makefile.ksplice默认目标是__ksplice，
__ksplice: $(ksplice-deps) $(ksplice-dirs)
@:
目标只是依赖两个dirs，没有具体的执行命令，所有的执行命令都是在依赖中执行的。对于ksplice-dirs的命令：
$(ksplice-dirs):
$(Q) $(MAKE) $(build)=$(@:_ksplice_%=%)
其中
build := -f $(ksplice-makefile) obj
所以命令展开就是：
make -f /usr/local/share/ksplice/Makefile.ksplice obj=arch/x86/crypto
又再次进入makefile.ksplice，这次传入了obj。
revert的作用就是把.ksplice_pre的文件执行cmd_ksplice-revert。
最后通过$(call cmd, ksplice-revert)调用
1
2
cmd_ksplice-revert = touch -r ksplice-revert-stamp $(@:_ksplice-revert_%=%); \
mv $(@:_ksplice-revert_%=%) $(@:_ksplice-revert_%.KSPLICE_pre=%)
在然后根据ksplice-clean-files把ksplice生成的文件clean掉。
1.3 SNAP
执行完revert之后，重新回到ksplice-create文件中继续执行
1
2
@snap_flags = (“KSPLICE_MODE=snap”);
runval_raw(@make_ksplice,@snap_flags)
展开即为：
1
执行命令：make -rR -f Makefile.ksplice KSPLICE_MODE=snap
进入Makefile.ksplice文件：
1
2
3
4
5
6
7
8
ifeq ($(KSPLICE_MODE),snap)
$(obj)/%.o.KSPLICE: $(obj)/%.o FORCE
$(if $(strip $(wildcard $<.KSPLICE_pre) $(filter $<, $?)), \
$(call cmd, ksplice-snap))
else
$(obj)/%. o.KSPLICE:$(obj)/%.o
$(call cmd, ksplice-diff)
endif
其中
1
2
3
cmd_ksplice-snap = $(ksplice-script) snap $@
cmd_ksplice-diff = $(ksplice-script) diff $@
ksplice-scrript = $(dir $(ksplice-makefile))ksplice-obj.pl
进入ksplice-obj.pl文件中:
1
2
3
4
5
6
7
sub do_snap {
my ($out) = @_;
my ($obj) = $out = ~ /^(.*)\.KSPLICE$/ or die;
die if (!-e $obj);
unlink "$obj.KSPLICE_pre" if (-e "$obj.KSPLICE_pre");
empty_diff($out);
}
1
2
3
4
5
6
7
8
9
sub empty_diff {
my ($out) = @_;
my ($obj) = $out =~ /^(.*)\.KSPLICE$/ or die;
unlink "$obj.KSPLICE_new_code" if (-e "$obj.KSPLICE_new_code");
unlink "$obj.KSPLICE_old_code" if (-e "$obj.KSPLICE_old_code");
open OUT, '>', "$out.tmp";
close OUT;
rename "$out.tmp", $out;
}
snap的工作就是生成一个.o.KSPLICE空文件，函数empty_diff就是用来生成空文件的。.o.KSPLICE文件用来作为一个标志位，只是为了后续diff阶段，如果有不同的.o就会把.o.KSPLICE中写入1，最后遍历所有的.o.KSPLICE，哪些为1就知道哪些有差异了。
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
sub do_diff {
my ($out) = @_;
my ($obj) = $out =~ /^(.*)\.KSPLICE$/ or die;
my $obj_pre = "$obj.KSPLICE_pre";
die if (!-e $obj);
die "Patch creates new object $obj" if (!-e $obj_pre);
if (system('cmp', '-s', '--', $obj_pre, $obj) == 0) {
unlink $obj_pre;
return empty_diff($out);
}
runval("$libexecdir/ksplice-objmanip", $obj, "$obj.KSPLICE_new_code", "keep-new-code", "$obj.KSPLICE_pre", $ENV{KSPLICE_KID});
return empty_diff($out) if (!-e "$obj.KSPLICE_new_code");
open OUT, '>', "$out.tmp";
print OUT "1\n";
close OUT;
rename "$out.tmp", $out;
runval("$libexecdir/ksplice-objmanip", $obj_pre, "$obj.KSPLICE_old_code", "keep-old-code");
}
无论snap还是diff都是要创建目标.o.KSPLICE, 但是动作不一样，并且snap是FORCE，diff不是强制的，最关键的就是打了patch之后，就会重新生成patch对应的.o，此时依赖条件更新了，就会执行diff命令。
1.4 创建ksplice模块
将kmodsrc目录拷贝到tmp目录下，执行命令：
1
@make_kmodsrc = (@make, "-C", $kernel_headers_dir, "M=$kmodsrc", "KSPLICE_KID=$kid", "KSPLICE_VERSION=1.0", "map_printk=$map_printk");
编译内核模块，然后make modules_install，
1
@make_kmodsrc_install = (@make_kmodsrc, qw(modules_install --old-file=_modinst_post --old-file=_emodinst_post), "MAKE=make --old-file=_modinst_post --old-file=_emodinst_post", "INSTALL_MOD_STRIP=1", "MODLIB=$tmpdir/ksplice-modules");
1.5 PATCH
将准备的patch文件更新到内核中：
1
runval_infile($patchfile, "patch", @patch_opt, "-bz", ".KSPLICE_presrc")；
-bz的意思：
要注意patch文件中各个文件的行号等内容要对齐，不然patch文件无法更新到内核源码中（要每个文件都要检查，并确认patch文件可用）。
打上补丁后，执行：
1
make_ksplice KSPLICE_MODE=diff
1.6 DIFF
1
2
my @diff_flags = ("KSPLICE_MODE=diff")
runval_raw(@make_ksplice, @diff_flags);
即执行命令：
1
make -rR -f Makefile.ksplice KSPLICE_MODE=diff
进入Makefile.ksplice文件：
1
2
3
4
5
6
7
8
9
10
11
ifeq ($(KSPLICE_MODE),diff)
define ksplice-cow-check
$(if $(strip $(1)),$(if $(filter-out %.KSPLICE,$@),$(if $(wildcard $@),$(if $(wildcard $@.KSPLICE_pre),,$(call cmd,ksplice-cow)))))$(1)
endef
define ksplice-add-cow-check
$(v) = $$(call ksplice-cow-check,$(value $(v)))
endef
ksplice-cow-eval += $(foreach v,if_changed if_changed_dep if_changed_rule,$(ksplice-add-cow-check))
endif # KSPLICE_MODE
其中
1
cmd_ksplice-cow = cp -a $@ $@.KSPLICE_pre
diff比较的是.o.KSPLICE_pre 和 新编译的.o，从do_diff的实现来看，在diff之前，KSPLICE_pre就已经生成了，生成KSPLICE_pre的命令只有cmd-ksplice-cow, 即diff操作的结果。
1
2
3
4
5
6
7
8
9
$KSPLICE_MODE ?= diff
ifeq ($(KSPLICE_MODE),snap)
$(obj)/%.o.KSPLICE: $(obj)/%.o FORCE
$(if $(strip $(wildcard $<.KSPLICE_pre) $(filter $<, $?)), \
$(call cmd, ksplice-snap))
else
$(obj)/%. o.KSPLICE:$(obj)/%.o
$(call cmd, ksplice-diff)
endif
在此处调用
1
cmd_ksplice-diff=$(ksplice-script) diff $@
进入ksplice-obj.pl中调用函数do_diff
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
sub do_diff {
my ($out) = @_;
my ($obj) = $out =~ /^(.*)\.KSPLICE$/ or die;
my $obj_pre = "$obj.KSPLICE_pre";
die if (!-e $obj);
die "Patch creates new object $obj" if (!-e $obj_pre);
if (system('cmp', '-s', '--', $obj_pre, $obj) == 0) {
unlink $obj_pre;
return empty_diff($out);
}
runval("$libexecdir/ksplice-objmanip", $obj, "$obj.KSPLICE_new_code", "keep-new-code", "$obj.KSPLICE_pre", $ENV{KSPLICE_KID});
return empty_diff($out) if (!-e "$obj.KSPLICE_new_code");
open OUT, '>', "$out.tmp";
print OUT "1\n";
close OUT;
rename "$out.tmp", $out;
runval("$libexecdir/ksplice-objmanip", $obj_pre, "$obj.KSPLICE_old_code", "keep-old-code");
}
此处有三个关键点，第一system系统调用cmp，比较$(obj)和$obj_pre之间的不同，第二通过调用ksplice-objmanip（即objmanip）生成new_code，并且在.o.KSPLICE_pre中写入标志位1，第三步调用ksplice-objmanip（即objmanip）将未打patch之前的代码生成old_code。第二步和第三步进入到C文件objmanip.c的main()函数中，根据传入的参数的不同，调用不同的函数，最后生成new和old。
1.7 模块编译
命令：
1
runstr（qw(find -name *.KSPLCE* ! ( - name *.KSPLICE -empty ) ! -name .*.KSPLICE.cmd -print0)）
找出所有.KSPLICE 非空的文件，将读入的内容保存到@modules中。对MOD的处理是在KSPLICE_KMODSRC中生成的。
命令：
1
runval(@make_ksplice, "KSPLICE_MODE=modinst", "MODLIB=$tmpdir/modules", "INSTALL_MOD_STRIP=1", "modules=@modulepaths");
在Makefile.ksplice中，对modinst的处理是：
1
2
3
4
5
6
ifeq ($(KSPLICE_MODE),modinst)
ksplice-deps += ksplice_modinst
PHONY += ksplice_modinst
ksplice_modinst:
$(Q) $(MAKE) –f $(srctree)/scripts/Makefile.modinst
endif
这里的Makefile.modinst和Makefile.modpost都是内核script中的Makefile。
在ksplice-create中分别调用了两次make_kmodsrc， 第一次编译出ksplice.ko模块，第二次传入参数KSPLICE_MODULES=@modules 生成new.ko 和 old.ko文件。在kmodsrc目录中的Makefile中，第一次编译的是KSPLICE_CORE:
1
2
KSPLICE_CORE = ksplice-$(KSPLICE_KID)
obj-m += $(KSPLICE_CORE).o
实际上最终编译生成ksplice-kid.ko 还是依靠的obj-m的方法编译的。
第二次编译的时候传入的modules，同时KSPLICE_SKIP_CORE=1，表示不编译ksplice.ko
在ksplice-create中，执行命令：
1
2
runval(@make_kmodsrc, "KSPLICE_MODULES=@modules", "KSPLICE_SKIP_CORE=1");
runval(@make_kmodsrc_install, "KSPLICE_MODULES=@modules", "KSPLICE_SKIP_CORE=1");
在kmodsrc/Makefile中：
1
2
3
4
5
6
ifneq ($(KSPLICE_MODULES),)
$(foreach mod,$(KSPLICE_MODULES),$(obj)/new-code-$(target).o): $(obj)/%.o: $ (src)/new_code_loader.c FORCE
$(call if_changed_rule,cc_o_c)
$(foreach mod,$(KSPLICE_MODULES),$(obj)/old-code-$(target).o): $(obj)/%.o: $ (src)/old_code_loader.c FORCE
$(call if_changed_rule,cc_o_c)
endif
以new为例：
1
2
$(KSPLICE)-n-objs = $(ksplice-new-code-objs)
ksplice-new-code-objs = new-code-$(target).o collect-new-code-$(mod).o
new.ko由new-code-mod.o 和 collect-new-code-$(mod).o 组成。
new-code-mod.o的命令：
1
2
3
$(foreach mod,$(KSPLICE_MODULES),$(obj)/new-code-$(target).o): $(obj)/%.o: \
$ (src)/new_code_loader.c FORCE
$(call if_changed_rule,cc_o_c)
collect-new-code-$(mod).o的命令：
1
2
3
4
5
$(obj)/collect-new-code-%.o: $(obj)/%.o.KSPLICE_new_code $(obj)/ksplice.lds FORCE
$(call if_changed,ksplice-collect)
cmd_ksplice-collect = \
$(ksplice-script) finalize $< $<.final $* && \
$(LD) --script=$(obj)/ksplice.lds -r -o $@ $<.final
collect的命令最后调用do_finalize生成mod.final，再结合ksplice.lds 生成collect-new-code-mod.o
2.ksplice-apply
2.1 校验补丁文件
第一，执行命令：chdir(unpack_update($file))
其中 unpack_update()在文件Ksplice.pm中，首先检测使用的补丁文件是否是目录，如果是则返回到ksplice-apply文件中；如果是压缩文件则将其解压到/tmp/临时目录下，然后将路径返回到ksplice-apply文件中。
第二，检测目标路径中是否存在contents文件，不存在就退出ksplice-apply程序。
第三，检测当前系统/sys/moudle下面是否已经加载了该补丁文件。
在上述操作中，如果有不满足要求的，通过设置apply_errors来输出错误信息。
2.2 加载补丁文件
执行命令load_module($change->{new_code_file})
1
2
3
4
5
6
7
8
9
10
sub load_module {
my ($module, @params) = @_;
push @modules_loaded, ($module =~ m/^(.)\.ko$/);
if (runval_raw("insmod", $module, @params) != 0){
pop @modules_loaded;
child_error();
return 0;
}
return 1;
}
在函数load_module()中调用系统函数insmod来加载ko文件。如果在加载过程中出现错误，由insmod返回错误信息。
