From 570a9e4930686e4631be05038a6936f773e967f9 Mon Sep 17 00:00:00 2001 From: miker Date: Mon, 19 May 2008 18:17:07 +0000 Subject: [PATCH] script to find new perms from permacrud that are not in the permission seed data yet git-svn-id: svn://svn.open-ils.org/ILS/trunk@9642 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/extras/reconcile-perms.sh | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) create mode 100755 Open-ILS/src/extras/reconcile-perms.sh diff --git a/Open-ILS/src/extras/reconcile-perms.sh b/Open-ILS/src/extras/reconcile-perms.sh new file mode 100755 index 0000000000..27764f9b31 --- /dev/null +++ b/Open-ILS/src/extras/reconcile-perms.sh @@ -0,0 +1,17 @@ +#!/bin/bash +pushd . >/dev/null 2>/dev/null +cd `dirname $0` + +xsltproc ../../examples/extract-IDL-permissions.xsl ../../examples/fm_IDL.xml|perl -e 'while(<>){s/^\s+(.*)\s+$/$1/o;print("$1\n")unless(/^\s*$/ || /\s+/)}'|sort -u > /tmp/oils_permacrud_perm_list +grep -A1 perm_list ../sql/Pg/950.data.seed-values.sql|grep "'"|cut -f2 -d"'"|sort -u > /tmp/oils_sql_perm_list + +echo "New permissions from permacrud:" +echo + +diff -pu /tmp/oils_sql_perm_list /tmp/oils_permacrud_perm_list |grep '^+'|cut -f2 -d'+'|grep -v '^$' + +echo + +popd >/dev/null 2>/dev/null + + -- 2.43.2