1 CREATE OR REPLACE FUNCTION pfo_rbac_permissions_from_old (rid integer, nsec text, nref integer) RETURNS integer AS $$
3 os role_setting%ROWTYPE ;
8 mastergroupid integer := 1 ;
9 newsgroupid integer := 0 ;
10 statsgroupid integer := 0 ;
14 SELECT group_id INTO newsgroupid FROM groups WHERE unix_group_name = 'newsadmin' ;
15 SELECT group_id INTO statsgroupid FROM groups WHERE unix_group_name = 'stats' ;
17 SELECT * INTO r FROM pfo_role WHERE old_role_id = rid ;
19 IF nsec = 'project_read' AND nref = r.home_group_id THEN
23 IF nsec = 'forge_admin' AND nref = -1 AND rid = 1 THEN
24 SELECT count(*) INTO tmp FROM role_setting WHERE role_id = rid ;
30 FOR os IN SELECT * FROM role_setting WHERE role_id = rid ORDER BY role_id, section_name, ref_id
32 SELECT group_id INTO opid FROM role WHERE role_id = os.role_id ;
34 IF os.section_name = 'projectadmin' THEN
35 CONTINUE WHEN os.value != 'A' ;
36 IF nsec = 'project_admin' AND nref = opid THEN
39 IF nsec = 'forge_admin' AND nref = -1 AND opid = mastergroupid THEN
42 IF nsec = 'approve_news' AND nref = -1 AND opid = newsgroupid THEN
45 IF nsec = 'forge_stats' AND nref = -1 AND opid = statsgroupid THEN
49 ELSIF os.section_name IN ('trackeradmin', 'pmadmin', 'forumadmin') THEN
50 CONTINUE WHEN os.value != '2' ;
51 onsec = CASE WHEN os.section_name = 'trackeradmin' THEN 'tracker_admin'
52 WHEN os.section_name = 'pmadmin' THEN 'pm_admin'
53 WHEN os.section_name = 'forumadmin' THEN 'forum_admin' END ;
54 IF nsec = onsec AND nref = opid THEN
58 ELSIF os.section_name IN ('tracker', 'newtracker') THEN
59 CONTINUE WHEN os.value = '-1' ;
60 onsec = CASE WHEN os.section_name = 'tracker' THEN os.section_name
61 WHEN os.section_name = 'newtracker' THEN 'new_tracker' END ;
62 onref = CASE WHEN os.section_name = 'tracker' THEN os.ref_id
63 WHEN os.section_name = 'newtracker' THEN opid END ;
64 onval = CASE WHEN os.value = '0' THEN 1
65 WHEN os.value = '1' THEN 3
66 WHEN os.value = '2' THEN 7
67 WHEN os.value = '3' THEN 5 END ;
68 IF nsec = onsec AND nref = onref THEN
72 ELSIF os.section_name IN ('pm', 'newpm') THEN
73 CONTINUE WHEN os.value = '-1' ;
74 onsec = CASE WHEN os.section_name = 'pm' THEN os.section_name
75 WHEN os.section_name = 'newpm' THEN 'new_pm' END ;
76 onref = CASE WHEN os.section_name = 'pm' THEN os.ref_id
77 WHEN os.section_name = 'newpm' THEN opid END ;
78 onval = CASE WHEN os.value = '0' THEN 1
79 WHEN os.value = '1' THEN 3
80 WHEN os.value = '2' THEN 7
81 WHEN os.value = '3' THEN 5 END ;
82 IF nsec = onsec AND nref = onref THEN
86 ELSIF os.section_name = 'forum' THEN
87 CONTINUE WHEN os.value = '-1' ;
88 onsec = os.section_name ;
90 SELECT moderation_level INTO tmp FROM forum_group_list WHERE group_forum_id = onref ;
91 onval = CASE WHEN os.value = '0' THEN 1
92 WHEN os.value = '1' AND tmp >= 2 THEN 2
93 WHEN os.value = '1' AND tmp <= 1 THEN 3
94 WHEN os.value = '2' THEN 4 END ;
95 IF nsec = onsec AND nref = onref THEN
99 ELSIF os.section_name = 'newforum' THEN
100 CONTINUE WHEN os.value = '-1' ;
101 onsec = 'new_forum' ;
103 onval = CASE WHEN os.value = '0' THEN 1
104 WHEN os.value = '1' THEN 2
105 WHEN os.value = '2' THEN 4 END ;
106 IF nsec = onsec AND nref = onref THEN
110 ELSIF os.section_name = 'docman' THEN
111 onsec = os.section_name ;
113 onval = CASE WHEN os.value = '0' THEN 1
114 WHEN os.value = '1' THEN 4 END ;
115 IF nsec = onsec AND nref = onref THEN
119 ELSIF os.section_name = 'frs' THEN
120 onsec = os.section_name ;
122 onval = CASE WHEN os.value = '0' THEN 1
123 WHEN os.value = '1' THEN 3 END ;
124 IF nsec = onsec AND nref = onref THEN
128 ELSIF os.section_name = 'scm' THEN
129 CONTINUE WHEN os.value = '-1' ;
130 onsec = os.section_name ;
132 onval = CASE WHEN os.value = '0' THEN 1
133 WHEN os.value = '1' THEN 2 END ;
134 IF nsec = onsec AND nref = onref THEN
138 ELSIF os.section_name = 'webcal' THEN
139 CONTINUE WHEN os.value = '0' ;
140 onsec = os.section_name ;
143 IF nsec = onsec AND nref = onref THEN
147 ELSIF os.section_name = 'plugin_mediawiki_read' THEN
148 CONTINUE WHEN os.value = '0' ;
149 onsec = os.section_name ;
152 IF nsec = onsec AND nref = onref THEN
156 ELSIF os.section_name = 'plugin_mediawiki_edit' THEN
157 CONTINUE WHEN os.value = '0' ;
158 onsec = os.section_name ;
161 IF nsec = onsec AND nref = onref THEN
165 ELSIF os.section_name = 'plugin_mediawiki_upload' THEN
166 CONTINUE WHEN os.value = '0' ;
167 onsec = os.section_name ;
170 IF nsec = onsec AND nref = onref THEN
174 ELSIF os.section_name = 'plugin_mediawiki_admin' THEN
175 CONTINUE WHEN os.value = '0' ;
176 onsec = os.section_name ;
179 IF nsec = onsec AND nref = onref THEN
184 RAISE EXCEPTION 'Unknown setting % for role %', os.section_name, os.role_id ;
185 CONTINUE WHEN os.value = '0' ;
186 onsec = os.section_name ;
188 onval = os.value::integer ;
189 IF nsec = onsec AND nref = onref THEN
200 $$ LANGUAGE plpgsql ;