annotate src/module.rs @ 7:9380392b9a60

Changes type marker parameter type from Option<T> to PhantomData<T>
author Jesse Hallett <jesse@galois.com>
date Fri, 03 Apr 2015 23:33:20 -0700
parents 2ec97116d72c
children a83c56216e21
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
1 //! Functions for use in pam modules.
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
2
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
3 use libc::{c_char};
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
4 use std::{mem, ptr};
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
5 use std::ffi::{CStr, CString};
7
9380392b9a60 Changes type marker parameter type from Option<T> to PhantomData<T>
Jesse Hallett <jesse@galois.com>
parents: 6
diff changeset
6 use std::marker::{PhantomData};
1
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
7
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
8 use constants;
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
9 use constants::*;
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
10
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
11 /// Opaque type, used as a pointer when making pam API calls.
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
12 ///
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
13 /// A module is invoked via an external function such as `pam_sm_authenticate`.
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
14 /// Such a call provides a pam handle pointer. The same pointer should be given
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
15 /// as an argument when making API calls.
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
16 #[allow(missing_copy_implementations)]
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
17 pub enum PamHandleT {}
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
18
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
19 #[allow(missing_copy_implementations)]
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
20 enum PamItemT {}
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
21
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
22 #[allow(missing_copy_implementations)]
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
23 pub enum PamDataT {}
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
24
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
25 #[link(name = "pam")]
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
26 extern {
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
27 fn pam_get_data(pamh: *const PamHandleT,
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
28 module_data_name: *const c_char,
6
2ec97116d72c Updates for rustc 1.0.0-beta
Jesse Hallett <jesse@galois.com>
parents: 1
diff changeset
29 data: &mut *const PamDataT,
1
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
30 ) -> PamResultCode;
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
31
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
32 fn pam_set_data(pamh: *const PamHandleT,
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
33 module_data_name: *const c_char,
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
34 data: Box<PamDataT>,
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
35 cleanup: extern fn (pamh: *const PamHandleT,
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
36 data: Box<PamDataT>,
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
37 error_status: PamResultCode
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
38 ),
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
39 ) -> PamResultCode;
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
40
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
41 fn pam_get_item(pamh: *const PamHandleT,
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
42 item_type: PamItemType,
6
2ec97116d72c Updates for rustc 1.0.0-beta
Jesse Hallett <jesse@galois.com>
parents: 1
diff changeset
43 item: &mut *const PamItemT,
1
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
44 ) -> PamResultCode;
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
45
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
46 fn pam_set_item(pamh: *mut PamHandleT,
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
47 item_type: PamItemType,
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
48 item: &PamItemT,
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
49 ) -> PamResultCode;
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
50
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
51 fn pam_get_user(pamh: *const PamHandleT,
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
52 user: & *mut c_char,
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
53 prompt: *const c_char,
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
54 ) -> PamResultCode;
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
55 }
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
56
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
57 pub type PamResult<T> = Result<T, PamResultCode>;
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
58
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
59 /// Type-level mapping for safely retrieving values with `get_item`.
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
60 ///
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
61 /// See `pam_get_item` in
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
62 /// http://www.linux-pam.org/Linux-PAM-html/mwg-expected-by-module-item.html
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
63 pub trait PamItem {
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
64 /// Maps a Rust type to a pam constant.
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
65 ///
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
66 /// For example, the type PamConv maps to the constant PAM_CONV. The pam
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
67 /// API contract specifies that when the API function `pam_get_item` is
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
68 /// called with the constant PAM_CONV, it will return a value of type
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
69 /// `PamConv`.
7
9380392b9a60 Changes type marker parameter type from Option<T> to PhantomData<T>
Jesse Hallett <jesse@galois.com>
parents: 6
diff changeset
70 fn item_type(_: PhantomData<Self>) -> PamItemType;
1
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
71 }
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
72
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
73 /// Gets some value, identified by `key`, that has been set by the module
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
74 /// previously.
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
75 ///
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
76 /// See `pam_get_data` in
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
77 /// http://www.linux-pam.org/Linux-PAM-html/mwg-expected-by-module-item.html
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
78 pub unsafe fn get_data<'a, T>(pamh: &'a PamHandleT, key: &str) -> PamResult<&'a T> {
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
79 let c_key = CString::new(key).unwrap().as_ptr();
6
2ec97116d72c Updates for rustc 1.0.0-beta
Jesse Hallett <jesse@galois.com>
parents: 1
diff changeset
80 let mut ptr: *const PamDataT = ptr::null();
1
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
81 let res = pam_get_data(pamh, c_key, &mut ptr);
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
82 if constants::PAM_SUCCESS == res && !ptr.is_null() {
6
2ec97116d72c Updates for rustc 1.0.0-beta
Jesse Hallett <jesse@galois.com>
parents: 1
diff changeset
83 let typed_ptr: *const T = mem::transmute(ptr);
2ec97116d72c Updates for rustc 1.0.0-beta
Jesse Hallett <jesse@galois.com>
parents: 1
diff changeset
84 let data: &T = &*typed_ptr;
1
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
85 Ok(data)
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
86 }
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
87 else {
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
88 Err(res)
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
89 }
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
90 }
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
91
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
92 /// Stores a value that can be retrieved later with `get_data`. The value lives
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
93 /// as long as the current pam cycle.
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
94 ///
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
95 /// See `pam_set_data` in
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
96 /// http://www.linux-pam.org/Linux-PAM-html/mwg-expected-by-module-item.html
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
97 pub fn set_data<T>(pamh: &PamHandleT, key: &str, data: Box<T>) -> PamResult<()> {
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
98 let c_key = CString::new(key).unwrap().as_ptr();
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
99 let res = unsafe {
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
100 let c_data: Box<PamDataT> = mem::transmute(data);
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
101 pam_set_data(pamh, c_key, c_data, cleanup::<T>)
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
102 };
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
103 if constants::PAM_SUCCESS == res { Ok(()) } else { Err(res) }
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
104 }
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
105
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
106 #[no_mangle]
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
107 pub extern fn cleanup<T>(_: *const PamHandleT, c_data: Box<PamDataT>, _: PamResultCode) {
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
108 unsafe {
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
109 let data: Box<T> = mem::transmute(c_data);
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
110 mem::drop(data);
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
111 }
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
112 }
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
113
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
114 /// Retrieves a value that has been set, possibly by the pam client. This is
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
115 /// particularly useful for getting a `PamConv` reference.
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
116 ///
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
117 /// See `pam_get_item` in
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
118 /// http://www.linux-pam.org/Linux-PAM-html/mwg-expected-by-module-item.html
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
119 pub fn get_item<'a, T: PamItem>(pamh: &'a PamHandleT) -> PamResult<&'a T> {
6
2ec97116d72c Updates for rustc 1.0.0-beta
Jesse Hallett <jesse@galois.com>
parents: 1
diff changeset
120 let mut ptr: *const PamItemT = ptr::null();
1
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
121 let (res, item) = unsafe {
7
9380392b9a60 Changes type marker parameter type from Option<T> to PhantomData<T>
Jesse Hallett <jesse@galois.com>
parents: 6
diff changeset
122 let r = pam_get_item(pamh, PamItem::item_type(PhantomData::<T>), &mut ptr);
6
2ec97116d72c Updates for rustc 1.0.0-beta
Jesse Hallett <jesse@galois.com>
parents: 1
diff changeset
123 let typed_ptr: *const T = mem::transmute(ptr);
2ec97116d72c Updates for rustc 1.0.0-beta
Jesse Hallett <jesse@galois.com>
parents: 1
diff changeset
124 let t: &T = &*typed_ptr;
1
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
125 (r, t)
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
126 };
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
127 if constants::PAM_SUCCESS == res { Ok(item) } else { Err(res) }
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
128 }
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
129
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
130 /// Retrieves the name of the user who is authenticating or logging in.
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
131 ///
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
132 /// This is really a specialization of `get_item`.
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
133 ///
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
134 /// See `pam_get_user` in
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
135 /// http://www.linux-pam.org/Linux-PAM-html/mwg-expected-by-module-item.html
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
136 pub fn get_user<'a>(pamh: &'a PamHandleT, prompt: Option<&str>) -> PamResult<String> {
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
137 let ptr: *mut c_char = ptr::null_mut();
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
138 let c_prompt = match prompt {
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
139 Some(p) => CString::new(p).unwrap().as_ptr(),
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
140 None => ptr::null(),
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
141 };
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
142 let res = unsafe { pam_get_user(pamh, &ptr, c_prompt) };
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
143 if constants::PAM_SUCCESS == res && !ptr.is_null() {
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
144 let const_ptr = ptr as *const c_char;
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
145 let bytes = unsafe { CStr::from_ptr(const_ptr).to_bytes() };
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
146 String::from_utf8(bytes.to_vec())
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
147 .map_err(|_| PAM_CONV_ERR)
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
148 }
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
149 else {
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
150 Err(res)
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
151 }
b195a14058bb initial commit
Jesse Hallett <jesse@galois.com>
parents:
diff changeset
152 }