# Contributor: Michael Mason # Maintainer: Michael Mason global pkgname := 'cutter' global pkgver := '1.04' global pkgrel := '0' global pkgdesc := '"A program that allows firewall administrators to abort TCP/IP connections'" global url := '"http://www.digitage.co.uk/digitage/software/linux-security/cutter'" global arch := '"all'" global license := '"GPL2'" global depends := ''"" global makedepends := '"linux-headers'" global install := ''"" global subpackages := ''"" global source := ""http://www.digitage.co.uk/digitage/files/cutter/$pkgname-$pkgver.tgz musl-fix.patch"" global _builddir := ""$srcdir"/$pkgname-$pkgver" proc prepare { cd $_builddir for i in [$source] { matchstr $i { *.patch { msg $i; patch -p1 -i "$srcdir"/$i || return 1} } } } proc build { cd $_builddir make || return 1 } proc package { cd $_builddir install -m755 -D $pkgname "$pkgdir"/usr/sbin/$pkgname || return 1 } global md5sums := '"0efbf3c62ab0bdba39b083ad023914de cutter-1.04.tgz dca1d7b39deb52edfd353bc8a7eb1d34 musl-fix.patch'" global sha256sums := '"1b336c69eb3393f6ca118a529773014c41126ac6dabd04b77151daa1c2f01180 cutter-1.04.tgz 66baab0636e605a935199785bb916219c24e0673c682289ff04a44d061a3e1fb musl-fix.patch'" global sha512sums := '"79c17ec8c17e696a79aa8b11fda347f2e6929eb35f9a37da450acf6aff7ab9471e13eaef24708f90f3f0c2791fade2eb944443b98df3d3ae4eef0c408abc7b3a cutter-1.04.tgz 815ffcfbae6865443b49390f1c5dc583243009150271804468aad00102b136ac2e6abe565efa18d15f4411690444ca6fdd1184a8b31e61f5a62115f87f6d53dc musl-fix.patch'" (CommandList children: [ (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgname) op:Equal rhs:{(cutter)} spids:[6])] spids: [6] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgver) op:Equal rhs:{(1.04)} spids:[9])] spids: [9] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgrel) op:Equal rhs:{(0)} spids:[12])] spids: [12] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:pkgdesc) op: Equal rhs: {(DQ ("A program that allows firewall administrators to abort TCP/IP connections"))} spids: [15] ) ] spids: [15] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:url) op: Equal rhs: {(DQ ("http://www.digitage.co.uk/digitage/software/linux-security/cutter"))} spids: [20] ) ] spids: [20] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:arch) op:Equal rhs:{(DQ (all))} spids:[25])] spids: [25] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:license) op:Equal rhs:{(DQ (GPL2))} spids:[30])] spids: [30] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:depends) op:Equal rhs:{(DQ )} spids:[35])] spids: [35] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:makedepends) op: Equal rhs: {(DQ (linux-headers))} spids: [39] ) ] spids: [39] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:install) op:Equal rhs:{(DQ )} spids:[44])] spids: [44] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:subpackages) op:Equal rhs:{(DQ )} spids:[48])] spids: [48] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:source) op: Equal rhs: { (DQ ("http://www.digitage.co.uk/digitage/files/cutter/") ($ VSub_Name "$pkgname") (-) ($ VSub_Name "$pkgver") (".tgz\n") ("\tmusl-fix.patch") ) } spids: [52] ) ] spids: [52] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:_builddir) op: Equal rhs: {(DQ ($ VSub_Name "$srcdir")) (/) ($ VSub_Name "$pkgname") (-) ($ VSub_Name "$pkgver")} spids: [63] ) ] spids: [63] ) (FuncDef name: prepare body: (BraceGroup children: [ (C {(cd)} {(DQ ($ VSub_Name "$_builddir"))}) (ForEach iter_name: i iter_words: [{($ VSub_Name "$source")}] do_arg_iter: False body: (DoGroup children: [ (Case to_match: {($ VSub_Name "$i")} arms: [ (case_arm pat_list: [{(Lit_Other "*") (.patch)}] action: [ (Sentence child: (C {(msg)} {($ VSub_Name "$i")}) terminator: ) (AndOr children: [ (C {(patch)} {(-p1)} {(-i)} {(DQ ($ VSub_Name "$srcdir")) (/) ($ VSub_Name "$i")} ) (ControlFlow token: arg_word: {(1)} ) ] op_id: Op_DPipe ) ] spids: [106 108 132 -1] ) ] spids: [99 103 135] ) ] spids: [96 138] ) spids: [92 94] ) ] spids: [77] ) spids: [73 76] ) (FuncDef name: build body: (BraceGroup children: [ (C {(cd)} {(DQ ($ VSub_Name "$_builddir"))}) (AndOr children: [(C {(make)}) (ControlFlow token: arg_word:{(1)})] op_id: Op_DPipe ) ] spids: [147] ) spids: [143 146] ) (FuncDef name: package body: (BraceGroup children: [ (C {(cd)} {(DQ ($ VSub_Name "$_builddir"))}) (AndOr children: [ (C {(install)} {(-m755)} {(-D)} {($ VSub_Name "$pkgname")} {(DQ ($ VSub_Name "$pkgdir")) (/usr/sbin/) ($ VSub_Name "$pkgname")} ) (ControlFlow token: arg_word:{(1)}) ] op_id: Op_DPipe ) ] spids: [172] ) spids: [168 171] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:md5sums) op: Equal rhs: { (DQ ("0efbf3c62ab0bdba39b083ad023914de cutter-1.04.tgz\n") ("dca1d7b39deb52edfd353bc8a7eb1d34 musl-fix.patch") ) } spids: [205] ) ] spids: [205] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:sha256sums) op: Equal rhs: { (DQ ( "1b336c69eb3393f6ca118a529773014c41126ac6dabd04b77151daa1c2f01180 cutter-1.04.tgz\n" ) ("66baab0636e605a935199785bb916219c24e0673c682289ff04a44d061a3e1fb musl-fix.patch") ) } spids: [211] ) ] spids: [211] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:sha512sums) op: Equal rhs: { (DQ ( "79c17ec8c17e696a79aa8b11fda347f2e6929eb35f9a37da450acf6aff7ab9471e13eaef24708f90f3f0c2791fade2eb944443b98df3d3ae4eef0c408abc7b3a cutter-1.04.tgz\n" ) ( "815ffcfbae6865443b49390f1c5dc583243009150271804468aad00102b136ac2e6abe565efa18d15f4411690444ca6fdd1184a8b31e61f5a62115f87f6d53dc musl-fix.patch" ) ) } spids: [217] ) ] spids: [217] ) ] )