/* * CDDL HEADER START * * The contents of this file are subject to the terms of the * Common Development and Distribution License (the "License"). * You may not use this file except in compliance with the License. * * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE * or http://www.opensolaris.org/os/licensing. * See the License for the specific language governing permissions * and limitations under the License. * * When distributing Covered Code, include this CDDL HEADER in each * file and include the License file at usr/src/OPENSOLARIS.LICENSE. * If applicable, add the following below this CDDL HEADER, with the * fields enclosed by brackets "[]" replaced with your own identifying * information: Portions Copyright [yyyy] [name of copyright owner] * * CDDL HEADER END */ /* * Copyright 2009 Sun Microsystems, Inc. All rights reserved. * Use is subject to license terms. */ /* * Database related utility routines */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "idmapd.h" #include "adutils.h" #include "string.h" #include "idmap_priv.h" #include "schema.h" #include "nldaputils.h" #include "miscutils.h" static idmap_retcode sql_compile_n_step_once(sqlite *, char *, sqlite_vm **, int *, int, const char ***); static idmap_retcode lookup_localsid2pid(idmap_mapping *, idmap_id_res *); static idmap_retcode lookup_cache_name2sid(sqlite *, const char *, const char *, char **, char **, idmap_rid_t *, int *); #define NELEM(a) (sizeof (a) / sizeof ((a)[0])) #define EMPTY_NAME(name) (*name == 0 || strcmp(name, "\"\"") == 0) #define DO_NOT_ALLOC_NEW_ID_MAPPING(req)\ (req->flag & IDMAP_REQ_FLG_NO_NEW_ID_ALLOC) #define AVOID_NAMESERVICE(req)\ (req->flag & IDMAP_REQ_FLG_NO_NAMESERVICE) #define ALLOW_WK_OR_LOCAL_SIDS_ONLY(req)\ (req->flag & IDMAP_REQ_FLG_WK_OR_LOCAL_SIDS_ONLY) #define IS_EPHEMERAL(pid) (pid > INT32_MAX && pid != SENTINEL_PID) typedef enum init_db_option { FAIL_IF_CORRUPT = 0, REMOVE_IF_CORRUPT = 1 } init_db_option_t; /* * Thread specific data to hold the database handles so that the * databases are not opened and closed for every request. It also * contains the sqlite busy handler structure. */ struct idmap_busy { const char *name; const int *delays; int delay_size; int total; int sec; }; typedef struct idmap_tsd { sqlite *db_db; sqlite *cache_db; struct idmap_busy cache_busy; struct idmap_busy db_busy; } idmap_tsd_t; /* * Flags to indicate how local the directory we're consulting is. * If neither is set, it means the directory belongs to a remote forest. */ #define DOMAIN_IS_LOCAL 0x01 #define FOREST_IS_LOCAL 0x02 static const int cache_delay_table[] = { 1, 2, 5, 10, 15, 20, 25, 30, 35, 40, 50, 50, 60, 70, 80, 90, 100}; static const int db_delay_table[] = { 5, 10, 15, 20, 30, 40, 55, 70, 100}; static pthread_key_t idmap_tsd_key; void idmap_tsd_destroy(void *key) { idmap_tsd_t *tsd = (idmap_tsd_t *)key; if (tsd) { if (tsd->db_db) (void) sqlite_close(tsd->db_db); if (tsd->cache_db) (void) sqlite_close(tsd->cache_db); free(tsd); } } int idmap_init_tsd_key(void) { return (pthread_key_create(&idmap_tsd_key, idmap_tsd_destroy)); } idmap_tsd_t * idmap_get_tsd(void) { idmap_tsd_t *tsd; if ((tsd = pthread_getspecific(idmap_tsd_key)) == NULL) { /* No thread specific data so create it */ if ((tsd = malloc(sizeof (*tsd))) != NULL) { /* Initialize thread specific data */ (void) memset(tsd, 0, sizeof (*tsd)); /* save the trhread specific data */ if (pthread_setspecific(idmap_tsd_key, tsd) != 0) { /* Can't store key */ free(tsd); tsd = NULL; } } else { tsd = NULL; } } return (tsd); } /* * A simple wrapper around u8_textprep_str() that returns the Unicode * lower-case version of some string. The result must be freed. */ char * tolower_u8(const char *s) { char *res = NULL; char *outs; size_t inlen, outlen, inbytesleft, outbytesleft; int rc, err; /* * u8_textprep_str() does not allocate memory. The input and * output buffers may differ in size (though that would be more * likely when normalization is done). We have to loop over it... * * To improve the chances that we can avoid looping we add 10 * bytes of output buffer room the first go around. */ inlen = inbytesleft = strlen(s); outlen = outbytesleft = inlen + 10; if ((res = malloc(outlen)) == NULL) return (NULL); outs = res; while ((rc = u8_textprep_str((char *)s, &inbytesleft, outs, &outbytesleft, U8_TEXTPREP_TOLOWER, U8_UNICODE_LATEST, &err)) < 0 && err == E2BIG) { if ((res = realloc(res, outlen + inbytesleft)) == NULL) return (NULL); /* adjust input/output buffer pointers */ s += (inlen - inbytesleft); outs = res + outlen - outbytesleft; /* adjust outbytesleft and outlen */ outlen += inbytesleft; outbytesleft += inbytesleft; } if (rc < 0) { free(res); res = NULL; return (NULL); } res[outlen - outbytesleft] = '\0'; return (res); } static int sql_exec_tran_no_cb(sqlite *db, char *sql, const char *dbname, const char *while_doing); /* * Initialize 'dbname' using 'sql' */ static int init_db_instance(const char *dbname, int version, const char *detect_version_sql, char * const *sql, init_db_option_t opt, int *created, int *upgraded) { int rc, curr_version; int tries = 1; int prio = LOG_NOTICE; sqlite *db = NULL; char *errmsg = NULL; *created = 0; *upgraded = 0; if (opt == REMOVE_IF_CORRUPT) tries = 3; rinse_repeat: if (tries == 0) { idmapdlog(LOG_ERR, "Failed to initialize db %s", dbname); return (-1); } if (tries-- == 1) /* Last try, log errors */ prio = LOG_ERR; db = sqlite_open(dbname, 0600, &errmsg); if (db == NULL) { idmapdlog(prio, "Error creating database %s (%s)", dbname, CHECK_NULL(errmsg)); sqlite_freemem(errmsg); if (opt == REMOVE_IF_CORRUPT) (void) unlink(dbname); goto rinse_repeat; } sqlite_busy_timeout(db, 3000); /* Detect current version of schema in the db, if any */ curr_version = 0; if (detect_version_sql != NULL) { char *end, **results; int nrow; #ifdef IDMAPD_DEBUG (void) fprintf(stderr, "Schema version detection SQL: %s\n", detect_version_sql); #endif /* IDMAPD_DEBUG */ rc = sqlite_get_table(db, detect_version_sql, &results, &nrow, NULL, &errmsg); if (rc != SQLITE_OK) { idmapdlog(prio, "Error detecting schema version of db %s (%s)", dbname, errmsg); sqlite_freemem(errmsg); sqlite_free_table(results); sqlite_close(db); return (-1); } if (nrow != 1) { idmapdlog(prio, "Error detecting schema version of db %s", dbname); sqlite_close(db); sqlite_free_table(results); return (-1); } curr_version = strtol(results[1], &end, 10); sqlite_free_table(results); } if (curr_version < 0) { if (opt == REMOVE_IF_CORRUPT) (void) unlink(dbname); goto rinse_repeat; } if (curr_version == version) goto done; /* Install or upgrade schema */ #ifdef IDMAPD_DEBUG (void) fprintf(stderr, "Schema init/upgrade SQL: %s\n", sql[curr_version]); #endif /* IDMAPD_DEBUG */ rc = sql_exec_tran_no_cb(db, sql[curr_version], dbname, (curr_version == 0) ? "installing schema" : "upgrading schema"); if (rc != 0) { idmapdlog(prio, "Error %s schema for db %s", dbname, (curr_version == 0) ? "installing schema" : "upgrading schema"); if (opt == REMOVE_IF_CORRUPT) (void) unlink(dbname); goto rinse_repeat; } *upgraded = (curr_version > 0); *created = (curr_version == 0); done: (void) sqlite_close(db); return (0); } /* * This is the SQLite database busy handler that retries the SQL * operation until it is successful. */ int /* LINTED E_FUNC_ARG_UNUSED */ idmap_sqlite_busy_handler(void *arg, const char *table_name, int count) { struct idmap_busy *busy = arg; int delay; struct timespec rqtp; if (count == 1) { busy->total = 0; busy->sec = 2; } if (busy->total > 1000 * busy->sec) { idmapdlog(LOG_DEBUG, "Thread %d waited %d sec for the %s database", pthread_self(), busy->sec, busy->name); busy->sec++; } if (count <= busy->delay_size) { delay = busy->delays[count-1]; } else { delay = busy->delays[busy->delay_size - 1]; } busy->total += delay; rqtp.tv_sec = 0; rqtp.tv_nsec = delay * (NANOSEC / MILLISEC); (void) nanosleep(&rqtp, NULL); return (1); } /* * Get the database handle */ idmap_retcode get_db_handle(sqlite **db) { char *errmsg; idmap_tsd_t *tsd; /* * Retrieve the db handle from thread-specific storage * If none exists, open and store in thread-specific storage. */ if ((tsd = idmap_get_tsd()) == NULL) { idmapdlog(LOG_ERR, "Error getting thread specific data for %s", IDMAP_DBNAME); return (IDMAP_ERR_MEMORY); } if (tsd->db_db == NULL) { tsd->db_db = sqlite_open(IDMAP_DBNAME, 0, &errmsg); if (tsd->db_db == NULL) { idmapdlog(LOG_ERR, "Error opening database %s (%s)", IDMAP_DBNAME, CHECK_NULL(errmsg)); sqlite_freemem(errmsg); return (IDMAP_ERR_DB); } tsd->db_busy.name = IDMAP_DBNAME; tsd->db_busy.delays = db_delay_table; tsd->db_busy.delay_size = sizeof (db_delay_table) / sizeof (int); sqlite_busy_handler(tsd->db_db, idmap_sqlite_busy_handler, &tsd->db_busy); } *db = tsd->db_db; return (IDMAP_SUCCESS); } /* * Get the cache handle */ idmap_retcode get_cache_handle(sqlite **cache) { char *errmsg; idmap_tsd_t *tsd; /* * Retrieve the db handle from thread-specific storage * If none exists, open and store in thread-specific storage. */ if ((tsd = idmap_get_tsd()) == NULL) { idmapdlog(LOG_ERR, "Error getting thread specific data for %s", IDMAP_DBNAME); return (IDMAP_ERR_MEMORY); } if (tsd->cache_db == NULL) { tsd->cache_db = sqlite_open(IDMAP_CACHENAME, 0, &errmsg); if (tsd->cache_db == NULL) { idmapdlog(LOG_ERR, "Error opening database %s (%s)", IDMAP_CACHENAME, CHECK_NULL(errmsg)); sqlite_freemem(errmsg); return (IDMAP_ERR_DB); } tsd->cache_busy.name = IDMAP_CACHENAME; tsd->cache_busy.delays = cache_delay_table; tsd->cache_busy.delay_size = sizeof (cache_delay_table) / sizeof (int); sqlite_busy_handler(tsd->cache_db, idmap_sqlite_busy_handler, &tsd->cache_busy); } *cache = tsd->cache_db; return (IDMAP_SUCCESS); } /* * Initialize cache and db */ int init_dbs() { char *sql[4]; int created, upgraded; /* name-based mappings; probably OK to blow away in a pinch(?) */ sql[0] = DB_INSTALL_SQL; sql[1] = DB_UPGRADE_FROM_v1_SQL; sql[2] = NULL; if (init_db_instance(IDMAP_DBNAME, DB_VERSION, DB_VERSION_SQL, sql, FAIL_IF_CORRUPT, &created, &upgraded) < 0) return (-1); /* mappings, name/SID lookup cache + ephemeral IDs; OK to blow away */ sql[0] = CACHE_INSTALL_SQL; sql[1] = CACHE_UPGRADE_FROM_v1_SQL; sql[2] = CACHE_UPGRADE_FROM_v2_SQL; sql[3] = NULL; if (init_db_instance(IDMAP_CACHENAME, CACHE_VERSION, CACHE_VERSION_SQL, sql, REMOVE_IF_CORRUPT, &created, &upgraded) < 0) return (-1); _idmapdstate.new_eph_db = (created || upgraded) ? 1 : 0; return (0); } /* * Finalize databases */ void fini_dbs() { } /* * This table is a listing of status codes that will be returned to the * client when a SQL command fails with the corresponding error message. */ static msg_table_t sqlmsgtable[] = { {IDMAP_ERR_U2W_NAMERULE_CONFLICT, "columns unixname, is_user, u2w_order are not unique"}, {IDMAP_ERR_W2U_NAMERULE_CONFLICT, "columns winname, windomain, is_user, is_wuser, w2u_order are not" " unique"}, {IDMAP_ERR_W2U_NAMERULE_CONFLICT, "Conflicting w2u namerules"}, {-1, NULL} }; /* * idmapd's version of string2stat to map SQLite messages to * status codes */ idmap_retcode idmapd_string2stat(const char *msg) { int i; for (i = 0; sqlmsgtable[i].msg; i++) { if (strcasecmp(sqlmsgtable[i].msg, msg) == 0) return (sqlmsgtable[i].retcode); } return (IDMAP_ERR_OTHER); } /* * Executes some SQL in a transaction. * * Returns 0 on success, -1 if it failed but the rollback succeeded, -2 * if the rollback failed. */ static int sql_exec_tran_no_cb(sqlite *db, char *sql, const char *dbname, const char *while_doing) { char *errmsg = NULL; int rc; rc = sqlite_exec(db, "BEGIN TRANSACTION;", NULL, NULL, &errmsg); if (rc != SQLITE_OK) { idmapdlog(LOG_ERR, "Begin transaction failed (%s) " "while %s (%s)", errmsg, while_doing, dbname); sqlite_freemem(errmsg); return (-1); } rc = sqlite_exec(db, sql, NULL, NULL, &errmsg); if (rc != SQLITE_OK) { idmapdlog(LOG_ERR, "Database error (%s) while %s (%s)", errmsg, while_doing, dbname); sqlite_freemem(errmsg); errmsg = NULL; goto rollback; } rc = sqlite_exec(db, "COMMIT TRANSACTION", NULL, NULL, &errmsg); if (rc == SQLITE_OK) { sqlite_freemem(errmsg); return (0); } idmapdlog(LOG_ERR, "Database commit error (%s) while s (%s)", errmsg, while_doing, dbname); sqlite_freemem(errmsg); errmsg = NULL; rollback: rc = sqlite_exec(db, "ROLLBACK TRANSACTION", NULL, NULL, &errmsg); if (rc != SQLITE_OK) { idmapdlog(LOG_ERR, "Rollback failed (%s) while %s (%s)", errmsg, while_doing, dbname); sqlite_freemem(errmsg); return (-2); } sqlite_freemem(errmsg); return (-1); } /* * Execute the given SQL statment without using any callbacks */ idmap_retcode sql_exec_no_cb(sqlite *db, const char *dbname, char *sql) { char *errmsg = NULL; int r; idmap_retcode retcode; r = sqlite_exec(db, sql, NULL, NULL, &errmsg); assert(r != SQLITE_LOCKED && r != SQLITE_BUSY); if (r != SQLITE_OK) { idmapdlog(LOG_ERR, "Database error on %s while executing %s " "(%s)", dbname, sql, CHECK_NULL(errmsg)); retcode = idmapd_string2stat(errmsg); if (errmsg != NULL) sqlite_freemem(errmsg); return (retcode); } return (IDMAP_SUCCESS); } /* * Generate expression that can be used in WHERE statements. * Examples: * * "" "unixuser" "=" "foo" "AND" */ idmap_retcode gen_sql_expr_from_rule(idmap_namerule *rule, char **out) { char *s_windomain = NULL, *s_winname = NULL; char *s_unixname = NULL; char *dir; char *lower_winname; int retcode = IDMAP_SUCCESS; if (out == NULL) return (IDMAP_ERR_ARG); if (!EMPTY_STRING(rule->windomain)) { s_windomain = sqlite_mprintf("AND windomain = %Q ", rule->windomain); if (s_windomain == NULL) { retcode = IDMAP_ERR_MEMORY; goto out; } } if (!EMPTY_STRING(rule->winname)) { if ((lower_winname = tolower_u8(rule->winname)) == NULL) lower_winname = rule->winname; s_winname = sqlite_mprintf( "AND winname = %Q AND is_wuser = %d ", lower_winname, rule->is_wuser ? 1 : 0); if (lower_winname != rule->winname) free(lower_winname); if (s_winname == NULL) { retcode = IDMAP_ERR_MEMORY; goto out; } } if (!EMPTY_STRING(rule->unixname)) { s_unixname = sqlite_mprintf( "AND unixname = %Q AND is_user = %d ", rule->unixname, rule->is_user ? 1 : 0); if (s_unixname == NULL) { retcode = IDMAP_ERR_MEMORY; goto out; } } switch (rule->direction) { case IDMAP_DIRECTION_BI: dir = "AND w2u_order > 0 AND u2w_order > 0"; break; case IDMAP_DIRECTION_W2U: dir = "AND w2u_order > 0" " AND (u2w_order = 0 OR u2w_order ISNULL)"; break; case IDMAP_DIRECTION_U2W: dir = "AND u2w_order > 0" " AND (w2u_order = 0 OR w2u_order ISNULL)"; break; default: dir = ""; break; } *out = sqlite_mprintf("%s %s %s %s", s_windomain ? s_windomain : "", s_winname ? s_winname : "", s_unixname ? s_unixname : "", dir); if (*out == NULL) { retcode = IDMAP_ERR_MEMORY; idmapdlog(LOG_ERR, "Out of memory"); goto out; } out: if (s_windomain != NULL) sqlite_freemem(s_windomain); if (s_winname != NULL) sqlite_freemem(s_winname); if (s_unixname != NULL) sqlite_freemem(s_unixname); return (retcode); } /* * Generate and execute SQL statement for LIST RPC calls */ idmap_retcode process_list_svc_sql(sqlite *db, const char *dbname, char *sql, uint64_t limit, int flag, list_svc_cb cb, void *result) { list_cb_data_t cb_data; char *errmsg = NULL; int r; idmap_retcode retcode = IDMAP_ERR_INTERNAL; (void) memset(&cb_data, 0, sizeof (cb_data)); cb_data.result = result; cb_data.limit = limit; cb_data.flag = flag; r = sqlite_exec(db, sql, cb, &cb_data, &errmsg); assert(r != SQLITE_LOCKED && r != SQLITE_BUSY); switch (r) { case SQLITE_OK: retcode = IDMAP_SUCCESS; break; default: retcode = IDMAP_ERR_INTERNAL; idmapdlog(LOG_ERR, "Database error on %s while executing " "%s (%s)", dbname, sql, CHECK_NULL(errmsg)); break; } if (errmsg != NULL) sqlite_freemem(errmsg); return (retcode); } /* * This routine is called by callbacks that process the results of * LIST RPC calls to validate data and to allocate memory for * the result array. */ idmap_retcode validate_list_cb_data(list_cb_data_t *cb_data, int argc, char **argv, int ncol, uchar_t **list, size_t valsize) { size_t nsize; void *tmplist; if (cb_data->limit > 0 && cb_data->next == cb_data->limit) return (IDMAP_NEXT); if (argc < ncol || argv == NULL) { idmapdlog(LOG_ERR, "Invalid data"); return (IDMAP_ERR_INTERNAL); } /* alloc in bulk to reduce number of reallocs */ if (cb_data->next >= cb_data->len) { nsize = (cb_data->len + SIZE_INCR) * valsize; tmplist = realloc(*list, nsize); if (tmplist == NULL) { idmapdlog(LOG_ERR, "Out of memory"); return (IDMAP_ERR_MEMORY); } *list = tmplist; (void) memset(*list + (cb_data->len * valsize), 0, SIZE_INCR * valsize); cb_data->len += SIZE_INCR; } return (IDMAP_SUCCESS); } static idmap_retcode get_namerule_order(char *winname, char *windomain, char *unixname, int direction, int is_diagonal, int *w2u_order, int *u2w_order) { *w2u_order = 0; *u2w_order = 0; /* * Windows to UNIX lookup order: * 1. winname@domain (or winname) to "" * 2. winname@domain (or winname) to unixname * 3. winname@* to "" * 4. winname@* to unixname * 5. *@domain (or *) to * * 6. *@domain (or *) to "" * 7. *@domain (or *) to unixname * 8. *@* to * * 9. *@* to "" * 10. *@* to unixname * * winname is a special case of winname@domain when domain is the * default domain. Similarly * is a special case of *@domain when * domain is the default domain. * * Note that "" has priority over specific names because "" inhibits * mappings and traditionally deny rules always had higher priority. */ if (direction != IDMAP_DIRECTION_U2W) { /* bi-directional or from windows to unix */ if (winname == NULL) return (IDMAP_ERR_W2U_NAMERULE); else if (unixname == NULL) return (IDMAP_ERR_W2U_NAMERULE); else if (EMPTY_NAME(winname)) return (IDMAP_ERR_W2U_NAMERULE); else if (*winname == '*' && windomain && *windomain == '*') { if (*unixname == '*') *w2u_order = 8; else if (EMPTY_NAME(unixname)) *w2u_order = 9; else /* unixname == name */ *w2u_order = 10; } else if (*winname == '*') { if (*unixname == '*') *w2u_order = 5; else if (EMPTY_NAME(unixname)) *w2u_order = 6; else /* name */ *w2u_order = 7; } else if (windomain != NULL && *windomain == '*') { /* winname == name */ if (*unixname == '*') return (IDMAP_ERR_W2U_NAMERULE); else if (EMPTY_NAME(unixname)) *w2u_order = 3; else /* name */ *w2u_order = 4; } else { /* winname == name && windomain == null or name */ if (*unixname == '*') return (IDMAP_ERR_W2U_NAMERULE); else if (EMPTY_NAME(unixname)) *w2u_order = 1; else /* name */ *w2u_order = 2; } } /* * 1. unixname to "", non-diagonal * 2. unixname to winname@domain (or winname), non-diagonal * 3. unixname to "", diagonal * 4. unixname to winname@domain (or winname), diagonal * 5. * to *@domain (or *), non-diagonal * 5. * to *@domain (or *), diagonal * 7. * to "" * 8. * to winname@domain (or winname) * 9. * to "", non-diagonal * 10. * to winname@domain (or winname), diagonal */ if (direction != IDMAP_DIRECTION_W2U) { int diagonal = is_diagonal ? 1 : 0; /* bi-directional or from unix to windows */ if (unixname == NULL || EMPTY_NAME(unixname)) return (IDMAP_ERR_U2W_NAMERULE); else if (winname == NULL) return (IDMAP_ERR_U2W_NAMERULE); else if (windomain != NULL && *windomain == '*') return (IDMAP_ERR_U2W_NAMERULE); else if (*unixname == '*') { if (*winname == '*') *u2w_order = 5 + diagonal; else if (EMPTY_NAME(winname)) *u2w_order = 7 + 2 * diagonal; else *u2w_order = 8 + 2 * diagonal; } else { if (*winname == '*') return (IDMAP_ERR_U2W_NAMERULE); else if (EMPTY_NAME(winname)) *u2w_order = 1 + 2 * diagonal; else *u2w_order = 2 + 2 * diagonal; } } return (IDMAP_SUCCESS); } /* * Generate and execute SQL statement to add name-based mapping rule */ idmap_retcode add_namerule(sqlite *db, idmap_namerule *rule) { char *sql = NULL; idmap_stat retcode; char *dom = NULL; char *name; int w2u_order, u2w_order; char w2ubuf[11], u2wbuf[11]; char *canonname = NULL; char *canondomain = NULL; retcode = get_namerule_order(rule->winname, rule->windomain, rule->unixname, rule->direction, rule->is_user == rule->is_wuser ? 0 : 1, &w2u_order, &u2w_order); if (retcode != IDMAP_SUCCESS) goto out; if (w2u_order) (void) snprintf(w2ubuf, sizeof (w2ubuf), "%d", w2u_order); if (u2w_order) (void) snprintf(u2wbuf, sizeof (u2wbuf), "%d", u2w_order); /* * For the triggers on namerules table to work correctly: * 1) Use NULL instead of 0 for w2u_order and u2w_order * 2) Use "" instead of NULL for "no domain" */ name = rule->winname; dom = rule->windomain; RDLOCK_CONFIG(); if (lookup_wksids_name2sid(name, dom, &canonname, &canondomain, NULL, NULL, NULL) == IDMAP_SUCCESS) { name = canonname; dom = canondomain; } else if (EMPTY_STRING(dom)) { if (_idmapdstate.cfg->pgcfg.default_domain) dom = _idmapdstate.cfg->pgcfg.default_domain; else dom = ""; } sql = sqlite_mprintf("INSERT into namerules " "(is_user, is_wuser, windomain, winname_display, is_nt4, " "unixname, w2u_order, u2w_order) " "VALUES(%d, %d, %Q, %Q, %d, %Q, %q, %q);", rule->is_user ? 1 : 0, rule->is_wuser ? 1 : 0, dom, name, rule->is_nt4 ? 1 : 0, rule->unixname, w2u_order ? w2ubuf : NULL, u2w_order ? u2wbuf : NULL); UNLOCK_CONFIG(); if (sql == NULL) { retcode = IDMAP_ERR_INTERNAL; idmapdlog(LOG_ERR, "Out of memory"); goto out; } retcode = sql_exec_no_cb(db, IDMAP_DBNAME, sql); if (retcode == IDMAP_ERR_OTHER) retcode = IDMAP_ERR_CFG; out: free(canonname); free(canondomain); if (sql != NULL) sqlite_freemem(sql); return (retcode); } /* * Flush name-based mapping rules */ idmap_retcode flush_namerules(sqlite *db) { idmap_stat retcode; retcode = sql_exec_no_cb(db, IDMAP_DBNAME, "DELETE FROM namerules;"); return (retcode); } /* * Generate and execute SQL statement to remove a name-based mapping rule */ idmap_retcode rm_namerule(sqlite *db, idmap_namerule *rule) { char *sql = NULL; idmap_stat retcode; char *expr = NULL; if (rule->direction < 0 && EMPTY_STRING(rule->windomain) && EMPTY_STRING(rule->winname) && EMPTY_STRING(rule->unixname)) return (IDMAP_SUCCESS); retcode = gen_sql_expr_from_rule(rule, &expr); if (retcode != IDMAP_SUCCESS) goto out; sql = sqlite_mprintf("DELETE FROM namerules WHERE 1 %s;", expr); if (sql == NULL) { retcode = IDMAP_ERR_INTERNAL; idmapdlog(LOG_ERR, "Out of memory"); goto out; } retcode = sql_exec_no_cb(db, IDMAP_DBNAME, sql); out: if (expr != NULL) sqlite_freemem(expr); if (sql != NULL) sqlite_freemem(sql); return (retcode); } /* * Compile the given SQL query and step just once. * * Input: * db - db handle * sql - SQL statement * * Output: * vm - virtual SQL machine * ncol - number of columns in the result * values - column values * * Return values: * IDMAP_SUCCESS * IDMAP_ERR_NOTFOUND * IDMAP_ERR_INTERNAL */ static idmap_retcode sql_compile_n_step_once(sqlite *db, char *sql, sqlite_vm **vm, int *ncol, int reqcol, const char ***values) { char *errmsg = NULL; int r; if ((r = sqlite_compile(db, sql, NULL, vm, &errmsg)) != SQLITE_OK) { idmapdlog(LOG_ERR, "Database error during %s (%s)", sql, CHECK_NULL(errmsg)); sqlite_freemem(errmsg); return (IDMAP_ERR_INTERNAL); } r = sqlite_step(*vm, ncol, values, NULL); assert(r != SQLITE_LOCKED && r != SQLITE_BUSY); if (r == SQLITE_ROW) { if (ncol != NULL && *ncol < reqcol) { (void) sqlite_finalize(*vm, NULL); *vm = NULL; return (IDMAP_ERR_INTERNAL); } /* Caller will call finalize after using the results */ return (IDMAP_SUCCESS); } else if (r == SQLITE_DONE) { (void) sqlite_finalize(*vm, NULL); *vm = NULL; return (IDMAP_ERR_NOTFOUND); } (void) sqlite_finalize(*vm, &errmsg); *vm = NULL; idmapdlog(LOG_ERR, "Database error during %s (%s)", sql, CHECK_NULL(errmsg)); sqlite_freemem(errmsg); return (IDMAP_ERR_INTERNAL); } /* * Load config in the state. * * nm_siduid and nm_sidgid fields: * state->nm_siduid represents mode used by sid2uid and uid2sid * requests for directory-based name mappings. Similarly, * state->nm_sidgid represents mode used by sid2gid and gid2sid * requests. * * sid2uid/uid2sid: * none -> directory_based_mapping != DIRECTORY_MAPPING_NAME * AD-mode -> !nldap_winname_attr && ad_unixuser_attr * nldap-mode -> nldap_winname_attr && !ad_unixuser_attr * mixed-mode -> nldap_winname_attr && ad_unixuser_attr * * sid2gid/gid2sid: * none -> directory_based_mapping != DIRECTORY_MAPPING_NAME * AD-mode -> !nldap_winname_attr && ad_unixgroup_attr * nldap-mode -> nldap_winname_attr && !ad_unixgroup_attr * mixed-mode -> nldap_winname_attr && ad_unixgroup_attr */ idmap_retcode load_cfg_in_state(lookup_state_t *state) { state->nm_siduid = IDMAP_NM_NONE; state->nm_sidgid = IDMAP_NM_NONE; RDLOCK_CONFIG(); state->eph_map_unres_sids = 0; if (_idmapdstate.cfg->pgcfg.eph_map_unres_sids) state->eph_map_unres_sids = 1; state->directory_based_mapping = _idmapdstate.cfg->pgcfg.directory_based_mapping; if (_idmapdstate.cfg->pgcfg.default_domain != NULL) { state->defdom = strdup(_idmapdstate.cfg->pgcfg.default_domain); if (state->defdom == NULL) { UNLOCK_CONFIG(); return (IDMAP_ERR_MEMORY); } } else { UNLOCK_CONFIG(); return (IDMAP_SUCCESS); } if (_idmapdstate.cfg->pgcfg.directory_based_mapping != DIRECTORY_MAPPING_NAME) { UNLOCK_CONFIG(); return (IDMAP_SUCCESS); } if (_idmapdstate.cfg->pgcfg.nldap_winname_attr != NULL) { state->nm_siduid = (_idmapdstate.cfg->pgcfg.ad_unixuser_attr != NULL) ? IDMAP_NM_MIXED : IDMAP_NM_NLDAP; state->nm_sidgid = (_idmapdstate.cfg->pgcfg.ad_unixgroup_attr != NULL) ? IDMAP_NM_MIXED : IDMAP_NM_NLDAP; } else { state->nm_siduid = (_idmapdstate.cfg->pgcfg.ad_unixuser_attr != NULL) ? IDMAP_NM_AD : IDMAP_NM_NONE; state->nm_sidgid = (_idmapdstate.cfg->pgcfg.ad_unixgroup_attr != NULL) ? IDMAP_NM_AD : IDMAP_NM_NONE; } if (_idmapdstate.cfg->pgcfg.ad_unixuser_attr != NULL) { state->ad_unixuser_attr = strdup(_idmapdstate.cfg->pgcfg.ad_unixuser_attr); if (state->ad_unixuser_attr == NULL) { UNLOCK_CONFIG(); return (IDMAP_ERR_MEMORY); } } if (_idmapdstate.cfg->pgcfg.ad_unixgroup_attr != NULL) { state->ad_unixgroup_attr = strdup(_idmapdstate.cfg->pgcfg.ad_unixgroup_attr); if (state->ad_unixgroup_attr == NULL) { UNLOCK_CONFIG(); return (IDMAP_ERR_MEMORY); } } if (_idmapdstate.cfg->pgcfg.nldap_winname_attr != NULL) { state->nldap_winname_attr = strdup(_idmapdstate.cfg->pgcfg.nldap_winname_attr); if (state->nldap_winname_attr == NULL) { UNLOCK_CONFIG(); return (IDMAP_ERR_MEMORY); } } UNLOCK_CONFIG(); return (IDMAP_SUCCESS); } /* * Set the rule with specified values. * All the strings are copied. */ static void idmap_namerule_set(idmap_namerule *rule, const char *windomain, const char *winname, const char *unixname, boolean_t is_user, boolean_t is_wuser, boolean_t is_nt4, int direction) { /* * Only update if they differ because we have to free * and duplicate the strings */ if (rule->windomain == NULL || windomain == NULL || strcmp(rule->windomain, windomain) != 0) { if (rule->windomain != NULL) { free(rule->windomain); rule->windomain = NULL; } if (windomain != NULL) rule->windomain = strdup(windomain); } if (rule->winname == NULL || winname == NULL || strcmp(rule->winname, winname) != 0) { if (rule->winname != NULL) { free(rule->winname); rule->winname = NULL; } if (winname != NULL) rule->winname = strdup(winname); } if (rule->unixname == NULL || unixname == NULL || strcmp(rule->unixname, unixname) != 0) { if (rule->unixname != NULL) { free(rule->unixname); rule->unixname = NULL; } if (unixname != NULL) rule->unixname = strdup(unixname); } rule->is_user = is_user; rule->is_wuser = is_wuser; rule->is_nt4 = is_nt4; rule->direction = direction; } /* * Lookup well-known SIDs table either by winname or by SID. * * If the given winname or SID is a well-known SID then we set is_wksid * variable and then proceed to see if the SID has a hard mapping to * a particular UID/GID (Ex: Creator Owner/Creator Group mapped to * fixed ephemeral ids). The direction flag indicates whether we have * a mapping; UNDEF indicates that we do not. * * If we find a mapping then we return success, except for the * special case of SENTINEL_PID which indicates an inhibited mapping. * * If we find a matching entry, but no mapping, we supply SID, name, and type * information and return "not found". Higher layers will probably * do ephemeral mapping. * * If we do not find a match, we return "not found" and leave the question * to higher layers. */ static idmap_retcode lookup_wksids_sid2pid(idmap_mapping *req, idmap_id_res *res, int *is_wksid) { const wksids_table_t *wksid; *is_wksid = 0; assert(req->id1.idmap_id_u.sid.prefix != NULL || req->id1name != NULL); if (req->id1.idmap_id_u.sid.prefix != NULL) { wksid = find_wksid_by_sid(req->id1.idmap_id_u.sid.prefix, req->id1.idmap_id_u.sid.rid, res->id.idtype); } else { wksid = find_wksid_by_name(req->id1name, req->id1domain, res->id.idtype); } if (wksid == NULL) return (IDMAP_ERR_NOTFOUND); /* Found matching entry. */ /* Fill in name if it was not already there. */ if (req->id1name == NULL) { req->id1name = strdup(wksid->winname); if (req->id1name == NULL) return (IDMAP_ERR_MEMORY); } /* Fill in SID if it was not already there */ if (req->id1.idmap_id_u.sid.prefix == NULL) { if (wksid->sidprefix != NULL) { req->id1.idmap_id_u.sid.prefix = strdup(wksid->sidprefix); } else { RDLOCK_CONFIG(); req->id1.idmap_id_u.sid.prefix = strdup(_idmapdstate.cfg->pgcfg.machine_sid); UNLOCK_CONFIG(); } if (req->id1.idmap_id_u.sid.prefix == NULL) return (IDMAP_ERR_MEMORY); req->id1.idmap_id_u.sid.rid = wksid->rid; } /* Fill in the canonical domain if not already there */ if (req->id1domain == NULL) { const char *dom; RDLOCK_CONFIG(); if (wksid->domain != NULL) dom = wksid->domain; else dom = _idmapdstate.hostname; req->id1domain = strdup(dom); UNLOCK_CONFIG(); if (req->id1domain == NULL) return (IDMAP_ERR_MEMORY); } *is_wksid = 1; req->direction |= _IDMAP_F_DONT_UPDATE_NAMECACHE; req->id1.idtype = wksid->is_wuser ? IDMAP_USID : IDMAP_GSID; if (res->id.idtype == IDMAP_POSIXID) { res->id.idtype = wksid->is_wuser ? IDMAP_UID : IDMAP_GID; } if (wksid->direction == IDMAP_DIRECTION_UNDEF) { /* * We don't have a mapping * (But note that we may have supplied SID, name, or type * information.) */ return (IDMAP_ERR_NOTFOUND); } /* * We have an explicit mapping. */ if (wksid->pid == SENTINEL_PID) { /* * ... which is that mapping is inhibited. */ return (IDMAP_ERR_NOMAPPING); } switch (res->id.idtype) { case IDMAP_UID: res->id.idmap_id_u.uid = wksid->pid; break; case IDMAP_GID: res->id.idmap_id_u.gid = wksid->pid; break; default: /* IDMAP_POSIXID is eliminated above */ return (IDMAP_ERR_NOTSUPPORTED); } res->direction = wksid->direction; res->info.how.map_type = IDMAP_MAP_TYPE_KNOWN_SID; res->info.src = IDMAP_MAP_SRC_HARD_CODED; return (IDMAP_SUCCESS); } /* * Look for an entry mapping a PID to a SID. * * Note that direction=UNDEF entries do not specify a mapping, * and that SENTINEL_PID entries represent either an inhibited * mapping or an ephemeral mapping. We don't handle either here; * they are filtered out by find_wksid_by_pid. */ static idmap_retcode lookup_wksids_pid2sid(idmap_mapping *req, idmap_id_res *res, int is_user) { const wksids_table_t *wksid; wksid = find_wksid_by_pid(req->id1.idmap_id_u.uid, is_user); if (wksid == NULL) return (IDMAP_ERR_NOTFOUND); if (res->id.idtype == IDMAP_SID) { res->id.idtype = wksid->is_wuser ? IDMAP_USID : IDMAP_GSID; } res->id.idmap_id_u.sid.rid = wksid->rid; if (wksid->sidprefix != NULL) { res->id.idmap_id_u.sid.prefix = strdup(wksid->sidprefix); } else { RDLOCK_CONFIG(); res->id.idmap_id_u.sid.prefix = strdup(_idmapdstate.cfg->pgcfg.machine_sid); UNLOCK_CONFIG(); } if (res->id.idmap_id_u.sid.prefix == NULL) { idmapdlog(LOG_ERR, "Out of memory"); return (IDMAP_ERR_MEMORY); } /* Fill in name if it was not already there. */ if (req->id2name == NULL) { req->id2name = strdup(wksid->winname); if (req->id2name == NULL) return (IDMAP_ERR_MEMORY); } /* Fill in the canonical domain if not already there */ if (req->id2domain == NULL) { const char *dom; RDLOCK_CONFIG(); if (wksid->domain != NULL) dom = wksid->domain; else dom = _idmapdstate.hostname; req->id2domain = strdup(dom); UNLOCK_CONFIG(); if (req->id2domain == NULL) return (IDMAP_ERR_MEMORY); } res->direction = wksid->direction; res->info.how.map_type = IDMAP_MAP_TYPE_KNOWN_SID; res->info.src = IDMAP_MAP_SRC_HARD_CODED; return (IDMAP_SUCCESS); } /* * Look up a name in the wksids list, matching name and, if supplied, domain, * and extract data. * * Given: * name Windows user name * domain Windows domain name (or NULL) * * Return: Error code * * *canonname canonical name (if canonname non-NULL) [1] * *canondomain canonical domain (if canondomain non-NULL) [1] * *sidprefix SID prefix (if sidprefix non-NULL) [1] * *rid RID (if rid non-NULL) [2] * *type Type (if type non-NULL) [2] * * [1] malloc'ed, NULL on error * [2] Undefined on error */ idmap_retcode lookup_wksids_name2sid( const char *name, const char *domain, char **canonname, char **canondomain, char **sidprefix, idmap_rid_t *rid, int *type) { const wksids_table_t *wksid; if (sidprefix != NULL) *sidprefix = NULL; if (canonname != NULL) *canonname = NULL; if (canondomain != NULL) *canondomain = NULL; wksid = find_wksid_by_name(name, domain, IDMAP_POSIXID); if (wksid == NULL) return (IDMAP_ERR_NOTFOUND); if (sidprefix != NULL) { if (wksid->sidprefix != NULL) { *sidprefix = strdup(wksid->sidprefix); } else { RDLOCK_CONFIG(); *sidprefix = strdup( _idmapdstate.cfg->pgcfg.machine_sid); UNLOCK_CONFIG(); } if (*sidprefix == NULL) goto nomem; } if (rid != NULL) *rid = wksid->rid; if (canonname != NULL) { *canonname = strdup(wksid->winname); if (*canonname == NULL) goto nomem; } if (canondomain != NULL) { if (wksid->domain != NULL) { *canondomain = strdup(wksid->domain); } else { RDLOCK_CONFIG(); *canondomain = strdup(_idmapdstate.hostname); UNLOCK_CONFIG(); } if (*canondomain == NULL) goto nomem; } if (type != NULL) *type = (wksid->is_wuser) ? _IDMAP_T_USER : _IDMAP_T_GROUP; return (IDMAP_SUCCESS); nomem: idmapdlog(LOG_ERR, "Out of memory"); if (sidprefix != NULL) { free(*sidprefix); *sidprefix = NULL; } if (canonname != NULL) { free(*canonname); *canonname = NULL; } if (canondomain != NULL) { free(*canondomain); *canondomain = NULL; } return (IDMAP_ERR_MEMORY); } static idmap_retcode lookup_cache_sid2pid(sqlite *cache, idmap_mapping *req, idmap_id_res *res) { char *end; char *sql = NULL; const char **values; sqlite_vm *vm = NULL; int ncol, is_user; uid_t pid; time_t curtime, exp; idmap_retcode retcode; char *is_user_string, *lower_name; /* Current time */ errno = 0; if ((curtime = time(NULL)) == (time_t)-1) { idmapdlog(LOG_ERR, "Failed to get current time (%s)", strerror(errno)); retcode = IDMAP_ERR_INTERNAL; goto out; } switch (res->id.idtype) { case IDMAP_UID: is_user_string = "1"; break; case IDMAP_GID: is_user_string = "0"; break; case IDMAP_POSIXID: /* the non-diagonal mapping */ is_user_string = "is_wuser"; break; default: retcode = IDMAP_ERR_NOTSUPPORTED; goto out; } /* SQL to lookup the cache */ if (req->id1.idmap_id_u.sid.prefix != NULL) { sql = sqlite_mprintf("SELECT pid, is_user, expiration, " "unixname, u2w, is_wuser, " "map_type, map_dn, map_attr, map_value, " "map_windomain, map_winname, map_unixname, map_is_nt4 " "FROM idmap_cache WHERE is_user = %s AND " "sidprefix = %Q AND rid = %u AND w2u = 1 AND " "(pid >= 2147483648 OR " "(expiration = 0 OR expiration ISNULL OR " "expiration > %d));", is_user_string, req->id1.idmap_id_u.sid.prefix, req->id1.idmap_id_u.sid.rid, curtime); } else if (req->id1name != NULL) { if ((lower_name = tolower_u8(req->id1name)) == NULL) lower_name = req->id1name; sql = sqlite_mprintf("SELECT pid, is_user, expiration, " "unixname, u2w, is_wuser, " "map_type, map_dn, map_attr, map_value, " "map_windomain, map_winname, map_unixname, map_is_nt4 " "FROM idmap_cache WHERE is_user = %s AND " "winname = %Q AND windomain = %Q AND w2u = 1 AND " "(pid >= 2147483648 OR " "(expiration = 0 OR expiration ISNULL OR " "expiration > %d));", is_user_string, lower_name, req->id1domain, curtime); if (lower_name != req->id1name) free(lower_name); } else { retcode = IDMAP_ERR_ARG; goto out; } if (sql == NULL) { idmapdlog(LOG_ERR, "Out of memory"); retcode = IDMAP_ERR_MEMORY; goto out; } retcode = sql_compile_n_step_once(cache, sql, &vm, &ncol, 14, &values); sqlite_freemem(sql); if (retcode == IDMAP_ERR_NOTFOUND) { goto out; } else if (retcode == IDMAP_SUCCESS) { /* sanity checks */ if (values[0] == NULL || values[1] == NULL) { retcode = IDMAP_ERR_CACHE; goto out; } pid = strtoul(values[0], &end, 10); is_user = strncmp(values[1], "0", 2) ? 1 : 0; if (is_user) { res->id.idtype = IDMAP_UID; res->id.idmap_id_u.uid = pid; } else { res->id.idtype = IDMAP_GID; res->id.idmap_id_u.gid = pid; } /* * We may have an expired ephemeral mapping. Consider * the expired entry as valid if we are not going to * perform name-based mapping. But do not renew the * expiration. * If we will be doing name-based mapping then store the * ephemeral pid in the result so that we can use it * if we end up doing dynamic mapping again. */ if (!DO_NOT_ALLOC_NEW_ID_MAPPING(req) && !AVOID_NAMESERVICE(req) && IS_EPHEMERAL(pid) && values[2] != NULL) { exp = strtoll(values[2], &end, 10); if (exp && exp <= curtime) { /* Store the ephemeral pid */ res->direction = IDMAP_DIRECTION_BI; req->direction |= is_user ? _IDMAP_F_EXP_EPH_UID : _IDMAP_F_EXP_EPH_GID; retcode = IDMAP_ERR_NOTFOUND; } } } out: if (retcode == IDMAP_SUCCESS) { if (values[4] != NULL) res->direction = (strtol(values[4], &end, 10) == 0)? IDMAP_DIRECTION_W2U:IDMAP_DIRECTION_BI; else res->direction = IDMAP_DIRECTION_W2U; if (values[3] != NULL) { if (req->id2name != NULL) free(req->id2name); req->id2name = strdup(values[3]); if (req->id2name == NULL) { idmapdlog(LOG_ERR, "Out of memory"); retcode = IDMAP_ERR_MEMORY; } } req->id1.idtype = strncmp(values[5], "0", 2) ? IDMAP_USID : IDMAP_GSID; if (req->flag & IDMAP_REQ_FLG_MAPPING_INFO) { res->info.src = IDMAP_MAP_SRC_CACHE; res->info.how.map_type = strtoul(values[6], &end, 10); switch (res->info.how.map_type) { case IDMAP_MAP_TYPE_DS_AD: res->info.how.idmap_how_u.ad.dn = strdup(values[7]); res->info.how.idmap_how_u.ad.attr = strdup(values[8]); res->info.how.idmap_how_u.ad.value = strdup(values[9]); break; case IDMAP_MAP_TYPE_DS_NLDAP: res->info.how.idmap_how_u.nldap.dn = strdup(values[7]); res->info.how.idmap_how_u.nldap.attr = strdup(values[8]); res->info.how.idmap_how_u.nldap.value = strdup(values[9]); break; case IDMAP_MAP_TYPE_RULE_BASED: res->info.how.idmap_how_u.rule.windomain = strdup(values[10]); res->info.how.idmap_how_u.rule.winname = strdup(values[11]); res->info.how.idmap_how_u.rule.unixname = strdup(values[12]); res->info.how.idmap_how_u.rule.is_nt4 = strtoul(values[13], &end, 1); res->info.how.idmap_how_u.rule.is_user = is_user; res->info.how.idmap_how_u.rule.is_wuser = strtoul(values[5], &end, 1); break; case IDMAP_MAP_TYPE_EPHEMERAL: break; case IDMAP_MAP_TYPE_LOCAL_SID: break; case IDMAP_MAP_TYPE_KNOWN_SID: break; case IDMAP_MAP_TYPE_IDMU: res->info.how.idmap_how_u.idmu.dn = strdup(values[7]); res->info.how.idmap_how_u.idmu.attr = strdup(values[8]); res->info.how.idmap_how_u.idmu.value = strdup(values[9]); break; default: /* Unknown mapping type */ assert(FALSE); } } } if (vm != NULL) (void) sqlite_finalize(vm, NULL); return (retcode); } static idmap_retcode lookup_cache_sid2name(sqlite *cache, const char *sidprefix, idmap_rid_t rid, char **canonname, char **canondomain, int *type) { char *end; char *sql = NULL; const char **values; sqlite_vm *vm = NULL; int ncol; time_t curtime; idmap_retcode retcode = IDMAP_SUCCESS; /* Get current time */ errno = 0; if ((curtime = time(NULL)) == (time_t)-1) { idmapdlog(LOG_ERR, "Failed to get current time (%s)", strerror(errno)); retcode = IDMAP_ERR_INTERNAL; goto out; } /* SQL to lookup the cache */ sql = sqlite_mprintf("SELECT canon_name, domain, type " "FROM name_cache WHERE " "sidprefix = %Q AND rid = %u AND " "(expiration = 0 OR expiration ISNULL OR " "expiration > %d);", sidprefix, rid, curtime); if (sql == NULL) { idmapdlog(LOG_ERR, "Out of memory"); retcode = IDMAP_ERR_MEMORY; goto out; } retcode = sql_compile_n_step_once(cache, sql, &vm, &ncol, 3, &values); sqlite_freemem(sql); if (retcode == IDMAP_SUCCESS) { if (type != NULL) { if (values[2] == NULL) { retcode = IDMAP_ERR_CACHE; goto out; } *type = strtol(values[2], &end, 10); } if (canonname != NULL && values[0] != NULL) { if ((*canonname = strdup(values[0])) == NULL) { idmapdlog(LOG_ERR, "Out of memory"); retcode = IDMAP_ERR_MEMORY; goto out; } } if (canondomain != NULL && values[1] != NULL) { if ((*canondomain = strdup(values[1])) == NULL) { if (canonname != NULL) { free(*canonname); *canonname = NULL; } idmapdlog(LOG_ERR, "Out of memory"); retcode = IDMAP_ERR_MEMORY; goto out; } } } out: if (vm != NULL) (void) sqlite_finalize(vm, NULL); return (retcode); } /* * Given SID, find winname using name_cache OR * Given winname, find SID using name_cache. * Used when mapping win to unix i.e. req->id1 is windows id and * req->id2 is unix id */ static idmap_retcode lookup_name_cache(sqlite *cache, idmap_mapping *req, idmap_id_res *res) { int type = -1; idmap_retcode retcode; char *sidprefix = NULL; idmap_rid_t rid; char *name = NULL, *domain = NULL; /* Done if we've both sid and winname */ if (req->id1.idmap_id_u.sid.prefix != NULL && req->id1name != NULL) return (IDMAP_SUCCESS); if (req->id1.idmap_id_u.sid.prefix != NULL) { /* Lookup sid to winname */ retcode = lookup_cache_sid2name(cache, req->id1.idmap_id_u.sid.prefix, req->id1.idmap_id_u.sid.rid, &name, &domain, &type); } else { /* Lookup winame to sid */ retcode = lookup_cache_name2sid(cache, req->id1name, req->id1domain, &name, &sidprefix, &rid, &type); } if (retcode != IDMAP_SUCCESS) { free(name); free(domain); free(sidprefix); return (retcode); } if (res->id.idtype == IDMAP_POSIXID) { res->id.idtype = (type == _IDMAP_T_USER) ? IDMAP_UID : IDMAP_GID; } req->id1.idtype = (type == _IDMAP_T_USER) ? IDMAP_USID : IDMAP_GSID; req->direction |= _IDMAP_F_DONT_UPDATE_NAMECACHE; /* * If we found canonical names or domain, use them instead of * the existing values. */ if (name != NULL) { free(req->id1name); req->id1name = name; } if (domain != NULL) { free(req->id1domain); req->id1domain = domain; } if (req->id1.idmap_id_u.sid.prefix == NULL) { req->id1.idmap_id_u.sid.prefix = sidprefix; req->id1.idmap_id_u.sid.rid = rid; } return (retcode); } static int ad_lookup_batch_int(lookup_state_t *state, idmap_mapping_batch *batch, idmap_ids_res *result, adutils_ad_t *dir, int how_local, int *num_processed) { idmap_retcode retcode; int i, num_queued, is_wuser, is_user; int next_request; int retries = 0, eunixtype; char **unixname; idmap_mapping *req; idmap_id_res *res; idmap_query_state_t *qs = NULL; idmap_how *how; char **dn, **attr, **value; *num_processed = 0; /* * Since req->id2.idtype is unused, we will use it here * to retrieve the value of sid_type. But it needs to be * reset to IDMAP_NONE before we return to prevent xdr * from mis-interpreting req->id2 when it tries to free * the input argument. Other option is to allocate an * array of integers and use it instead for the batched * call. But why un-necessarily allocate memory. That may * be an option if req->id2.idtype cannot be re-used in * future. * * Similarly, we use req->id2.idmap_id_u.uid to return uidNumber * or gidNumber supplied by IDMU, and reset it back to SENTINEL_PID * when we're done. Note that the query always puts the result in * req->id2.idmap_id_u.uid, not .gid. */ retry: retcode = idmap_lookup_batch_start(dir, state->ad_nqueries, state->directory_based_mapping, state->defdom, &qs); if (retcode != IDMAP_SUCCESS) { if (retcode == IDMAP_ERR_RETRIABLE_NET_ERR && retries++ < ADUTILS_DEF_NUM_RETRIES) goto retry; degrade_svc(1, "failed to create batch for AD lookup"); goto out; } num_queued = 0; restore_svc(); if (how_local & FOREST_IS_LOCAL) { /* * Directory based name mapping is only performed within the * joined forest. We don't trust other "trusted" * forests to provide DS-based name mapping information because * AD's definition of "cross-forest trust" does not encompass * this sort of behavior. */ idmap_lookup_batch_set_unixattr(qs, state->ad_unixuser_attr, state->ad_unixgroup_attr); } for (i = 0; i < batch->idmap_mapping_batch_len; i++) { req = &batch->idmap_mapping_batch_val[i]; res = &result->ids.ids_val[i]; how = &res->info.how; retcode = IDMAP_SUCCESS; req->id2.idtype = IDMAP_NONE; req->id2.idmap_id_u.uid = SENTINEL_PID; /* Skip if no AD lookup required */ if (!(req->direction & _IDMAP_F_LOOKUP_AD)) continue; /* Skip if we've already tried and gotten a "not found" */ if (req->direction & _IDMAP_F_LOOKUP_OTHER_AD) continue; /* Skip if we've already either succeeded or failed */ if (res->retcode != IDMAP_ERR_RETRIABLE_NET_ERR) continue; if (IS_REQUEST_SID(*req, 1)) { /* win2unix request: */ posix_id_t *pid = NULL; unixname = dn = attr = value = NULL; eunixtype = _IDMAP_T_UNDEF; if (state->directory_based_mapping == DIRECTORY_MAPPING_NAME && req->id2name == NULL) { if (res->id.idtype == IDMAP_UID && AD_OR_MIXED(state->nm_siduid)) { eunixtype = _IDMAP_T_USER; unixname = &req->id2name; } else if (res->id.idtype == IDMAP_GID && AD_OR_MIXED(state->nm_sidgid)) { eunixtype = _IDMAP_T_GROUP; unixname = &req->id2name; } else if (AD_OR_MIXED(state->nm_siduid) || AD_OR_MIXED(state->nm_sidgid)) { unixname = &req->id2name; } if (unixname != NULL) { /* * Get how info for DS-based name * mapping only if AD or MIXED * mode is enabled. */ idmap_info_free(&res->info); res->info.src = IDMAP_MAP_SRC_NEW; how->map_type = IDMAP_MAP_TYPE_DS_AD; dn = &how->idmap_how_u.ad.dn; attr = &how->idmap_how_u.ad.attr; value = &how->idmap_how_u.ad.value; } } else if (state->directory_based_mapping == DIRECTORY_MAPPING_IDMU && (how_local & DOMAIN_IS_LOCAL)) { /* * Ensure that we only do IDMU processing * when querying the domain we've joined. */ pid = &req->id2.idmap_id_u.uid; /* * Get how info for IDMU based mapping. */ idmap_info_free(&res->info); res->info.src = IDMAP_MAP_SRC_NEW; how->map_type = IDMAP_MAP_TYPE_IDMU; dn = &how->idmap_how_u.idmu.dn; attr = &how->idmap_how_u.idmu.attr; value = &how->idmap_how_u.idmu.value; } if (req->id1.idmap_id_u.sid.prefix != NULL) { /* Lookup AD by SID */ retcode = idmap_sid2name_batch_add1( qs, req->id1.idmap_id_u.sid.prefix, &req->id1.idmap_id_u.sid.rid, eunixtype, dn, attr, value, (req->id1name == NULL) ? &req->id1name : NULL, (req->id1domain == NULL) ? &req->id1domain : NULL, (int *)&req->id2.idtype, unixname, pid, &res->retcode); if (retcode == IDMAP_SUCCESS) num_queued++; } else { /* Lookup AD by winname */ assert(req->id1name != NULL); retcode = idmap_name2sid_batch_add1( qs, req->id1name, req->id1domain, eunixtype, dn, attr, value, &req->id1name, &req->id1.idmap_id_u.sid.prefix, &req->id1.idmap_id_u.sid.rid, (int *)&req->id2.idtype, unixname, pid, &res->retcode); if (retcode == IDMAP_SUCCESS) num_queued++; } } else if (IS_REQUEST_UID(*req) || IS_REQUEST_GID(*req)) { /* unix2win request: */ if (res->id.idmap_id_u.sid.prefix != NULL && req->id2name != NULL) { /* Already have SID and winname. done */ res->retcode = IDMAP_SUCCESS; continue; } if (res->id.idmap_id_u.sid.prefix != NULL) { /* * SID but no winname -- lookup AD by * SID to get winname. * how info is not needed here because * we are not retrieving unixname from * AD. */ retcode = idmap_sid2name_batch_add1( qs, res->id.idmap_id_u.sid.prefix, &res->id.idmap_id_u.sid.rid, _IDMAP_T_UNDEF, NULL, NULL, NULL, &req->id2name, &req->id2domain, (int *)&req->id2.idtype, NULL, NULL, &res->retcode); if (retcode == IDMAP_SUCCESS) num_queued++; } else if (req->id2name != NULL) { /* * winname but no SID -- lookup AD by * winname to get SID. * how info is not needed here because * we are not retrieving unixname from * AD. */ retcode = idmap_name2sid_batch_add1( qs, req->id2name, req->id2domain, _IDMAP_T_UNDEF, NULL, NULL, NULL, NULL, &res->id.idmap_id_u.sid.prefix, &res->id.idmap_id_u.sid.rid, (int *)&req->id2.idtype, NULL, NULL, &res->retcode); if (retcode == IDMAP_SUCCESS) num_queued++; } else if (state->directory_based_mapping == DIRECTORY_MAPPING_IDMU && (how_local & DOMAIN_IS_LOCAL)) { assert(req->id1.idmap_id_u.uid != SENTINEL_PID); is_user = IS_REQUEST_UID(*req); if (res->id.idtype == IDMAP_USID) is_wuser = 1; else if (res->id.idtype == IDMAP_GSID) is_wuser = 0; else is_wuser = is_user; /* IDMU can't do diagonal mappings */ if (is_user != is_wuser) continue; idmap_info_free(&res->info); res->info.src = IDMAP_MAP_SRC_NEW; how->map_type = IDMAP_MAP_TYPE_IDMU; retcode = idmap_pid2sid_batch_add1( qs, req->id1.idmap_id_u.uid, is_user, &how->idmap_how_u.ad.dn, &how->idmap_how_u.ad.attr, &how->idmap_how_u.ad.value, &res->id.idmap_id_u.sid.prefix, &res->id.idmap_id_u.sid.rid, &req->id2name, &req->id2domain, (int *)&req->id2.idtype, &res->retcode); if (retcode == IDMAP_SUCCESS) num_queued++; } else if (req->id1name != NULL) { /* * No SID and no winname but we've unixname. * Lookup AD by unixname to get SID. */ is_user = (IS_REQUEST_UID(*req)) ? 1 : 0; if (res->id.idtype == IDMAP_USID) is_wuser = 1; else if (res->id.idtype == IDMAP_GSID) is_wuser = 0; else is_wuser = is_user; idmap_info_free(&res->info); res->info.src = IDMAP_MAP_SRC_NEW; how->map_type = IDMAP_MAP_TYPE_DS_AD; retcode = idmap_unixname2sid_batch_add1( qs, req->id1name, is_user, is_wuser, &how->idmap_how_u.ad.dn, &how->idmap_how_u.ad.attr, &how->idmap_how_u.ad.value, &res->id.idmap_id_u.sid.prefix, &res->id.idmap_id_u.sid.rid, &req->id2name, &req->id2domain, (int *)&req->id2.idtype, &res->retcode); if (retcode == IDMAP_SUCCESS) num_queued++; } } if (retcode == IDMAP_ERR_DOMAIN_NOTFOUND) { req->direction |= _IDMAP_F_LOOKUP_OTHER_AD; retcode = IDMAP_SUCCESS; } else if (retcode != IDMAP_SUCCESS) { break; } } /* End of for loop */ if (retcode == IDMAP_SUCCESS) { /* add keeps track if we added an entry to the batch */ if (num_queued > 0) retcode = idmap_lookup_batch_end(&qs); else idmap_lookup_release_batch(&qs); } else { idmap_lookup_release_batch(&qs); num_queued = 0; next_request = i + 1; } if (retcode == IDMAP_ERR_RETRIABLE_NET_ERR && retries++ < ADUTILS_DEF_NUM_RETRIES) goto retry; else if (retcode == IDMAP_ERR_RETRIABLE_NET_ERR) degrade_svc(1, "some AD lookups timed out repeatedly"); if (retcode != IDMAP_SUCCESS) { /* Mark any unproccessed requests for an other AD */ for (i = next_request; i < batch->idmap_mapping_batch_len; i++) { req = &batch->idmap_mapping_batch_val[i]; req->direction |= _IDMAP_F_LOOKUP_OTHER_AD; } } if (retcode != IDMAP_SUCCESS) idmapdlog(LOG_NOTICE, "Failed to batch AD lookup requests"); out: /* * This loop does the following: * 1. Reset _IDMAP_F_LOOKUP_AD flag from the request. * 2. Reset req->id2.idtype to IDMAP_NONE * 3. If batch_start or batch_add failed then set the status * of each request marked for AD lookup to that error. * 4. Evaluate the type of the AD object (i.e. user or group) * and update the idtype in request. */ for (i = 0; i < batch->idmap_mapping_batch_len; i++) { int type; uid_t posix_id; req = &batch->idmap_mapping_batch_val[i]; type = req->id2.idtype; req->id2.idtype = IDMAP_NONE; posix_id = req->id2.idmap_id_u.uid; req->id2.idmap_id_u.uid = SENTINEL_PID; res = &result->ids.ids_val[i]; /* * If it didn't need AD lookup, ignore it. */ if (!(req->direction & _IDMAP_F_LOOKUP_AD)) continue; /* * If we deferred it this time, reset for the next * AD server. */ if (req->direction & _IDMAP_F_LOOKUP_OTHER_AD) { req->direction &= ~_IDMAP_F_LOOKUP_OTHER_AD; continue; } /* Count number processed */ (*num_processed)++; /* Reset AD lookup flag */ req->direction &= ~(_IDMAP_F_LOOKUP_AD); /* * If batch_start or batch_add failed then set the * status of each request marked for AD lookup to * that error. */ if (retcode != IDMAP_SUCCESS) { res->retcode = retcode; continue; } if (res->retcode == IDMAP_ERR_NOTFOUND) { /* Nothing found - remove the preset info */ idmap_info_free(&res->info); } if (IS_REQUEST_SID(*req, 1)) { if (res->retcode != IDMAP_SUCCESS) continue; /* Evaluate result type */ switch (type) { case _IDMAP_T_USER: if (res->id.idtype == IDMAP_POSIXID) res->id.idtype = IDMAP_UID; /* * We found a user. If we got information * from IDMU and we were expecting a user, * copy the id. */ if (posix_id != SENTINEL_PID && res->id.idtype == IDMAP_UID) { res->id.idmap_id_u.uid = posix_id; res->direction = IDMAP_DIRECTION_BI; res->info.how.map_type = IDMAP_MAP_TYPE_IDMU; res->info.src = IDMAP_MAP_SRC_NEW; } req->id1.idtype = IDMAP_USID; break; case _IDMAP_T_GROUP: if (res->id.idtype == IDMAP_POSIXID) res->id.idtype = IDMAP_GID; /* * We found a group. If we got information * from IDMU and we were expecting a group, * copy the id. */ if (posix_id != SENTINEL_PID && res->id.idtype == IDMAP_GID) { res->id.idmap_id_u.gid = posix_id; res->direction = IDMAP_DIRECTION_BI; res->info.how.map_type = IDMAP_MAP_TYPE_IDMU; res->info.src = IDMAP_MAP_SRC_NEW; } req->id1.idtype = IDMAP_GSID; break; default: res->retcode = IDMAP_ERR_SID; break; } if (res->retcode == IDMAP_SUCCESS && req->id1name != NULL && (req->id2name == NULL || res->id.idmap_id_u.uid == SENTINEL_PID) && NLDAP_MODE(res->id.idtype, state)) { req->direction |= _IDMAP_F_LOOKUP_NLDAP; state->nldap_nqueries++; } } else if (IS_REQUEST_UID(*req) || IS_REQUEST_GID(*req)) { if (res->retcode != IDMAP_SUCCESS) { if ((!(IDMAP_FATAL_ERROR(res->retcode))) && res->id.idmap_id_u.sid.prefix == NULL && req->id2name == NULL) /* no winname */ /* * If AD lookup by unixname or pid * failed with non fatal error * then clear the error (ie set * res->retcode to success). * This allows the next pass to * process other mapping * mechanisms for this request. */ res->retcode = IDMAP_SUCCESS; continue; } /* Evaluate result type */ switch (type) { case _IDMAP_T_USER: if (res->id.idtype == IDMAP_SID) res->id.idtype = IDMAP_USID; break; case _IDMAP_T_GROUP: if (res->id.idtype == IDMAP_SID) res->id.idtype = IDMAP_GSID; break; default: res->retcode = IDMAP_ERR_SID; break; } } } return (retcode); } /* * Batch AD lookups */ idmap_retcode ad_lookup_batch(lookup_state_t *state, idmap_mapping_batch *batch, idmap_ids_res *result) { idmap_retcode retcode; int i, j; idmap_mapping *req; idmap_id_res *res; int num_queries; int num_processed; if (state->ad_nqueries == 0) return (IDMAP_SUCCESS); for (i = 0; i < batch->idmap_mapping_batch_len; i++) { req = &batch->idmap_mapping_batch_val[i]; res = &result->ids.ids_val[i]; /* Skip if not marked for AD lookup or already in error. */ if (!(req->direction & _IDMAP_F_LOOKUP_AD) || res->retcode != IDMAP_SUCCESS) continue; /* Init status */ res->retcode = IDMAP_ERR_RETRIABLE_NET_ERR; } RDLOCK_CONFIG(); num_queries = state->ad_nqueries; if (_idmapdstate.num_gcs == 0 && _idmapdstate.num_dcs == 0) { /* Case of no ADs */ retcode = IDMAP_ERR_NO_ACTIVEDIRECTORY; for (i = 0; i < batch->idmap_mapping_batch_len; i++) { req = &batch->idmap_mapping_batch_val[i]; res = &result->ids.ids_val[i]; if (!(req->direction & _IDMAP_F_LOOKUP_AD)) continue; req->direction &= ~(_IDMAP_F_LOOKUP_AD); res->retcode = IDMAP_ERR_NO_ACTIVEDIRECTORY; } goto out; } if (state->directory_based_mapping == DIRECTORY_MAPPING_IDMU) { for (i = 0; i < _idmapdstate.num_dcs && num_queries > 0; i++) { retcode = ad_lookup_batch_int(state, batch, result, _idmapdstate.dcs[i], i == 0 ? DOMAIN_IS_LOCAL|FOREST_IS_LOCAL : 0, &num_processed); num_queries -= num_processed; } } for (i = 0; i < _idmapdstate.num_gcs && num_queries > 0; i++) { retcode = ad_lookup_batch_int(state, batch, result, _idmapdstate.gcs[i], i == 0 ? FOREST_IS_LOCAL : 0, &num_processed); num_queries -= num_processed; } /* * There are no more ADs to try. Return errors for any * remaining requests. */ if (num_queries > 0) { for (j = 0; j < batch->idmap_mapping_batch_len; j++) { req = &batch->idmap_mapping_batch_val[j]; res = &result->ids.ids_val[j]; if (!(req->direction & _IDMAP_F_LOOKUP_AD)) continue; req->direction &= ~(_IDMAP_F_LOOKUP_AD); res->retcode = IDMAP_ERR_DOMAIN_NOTFOUND; } } out: UNLOCK_CONFIG(); /* AD lookups done. Reset state->ad_nqueries and return */ state->ad_nqueries = 0; return (retcode); } /* * Convention when processing win2unix requests: * * Windows identity: * req->id1name = * winname if given otherwise winname found will be placed * here. * req->id1domain = * windomain if given otherwise windomain found will be * placed here. * req->id1.idtype = * Either IDMAP_SID/USID/GSID. If this is IDMAP_SID then it'll * be set to IDMAP_USID/GSID depending upon whether the * given SID is user or group respectively. The user/group-ness * is determined either when looking up well-known SIDs table OR * if the SID is found in namecache OR by ad_lookup_batch(). * req->id1..sid.[prefix, rid] = * SID if given otherwise SID found will be placed here. * * Unix identity: * req->id2name = * unixname found will be placed here. * req->id2domain = * NOT USED * res->id.idtype = * Target type initialized from req->id2.idtype. If * it is IDMAP_POSIXID then actual type (IDMAP_UID/GID) found * will be placed here. * res->id..[uid or gid] = * UID/GID found will be placed here. * * Others: * res->retcode = * Return status for this request will be placed here. * res->direction = * Direction found will be placed here. Direction * meaning whether the resultant mapping is valid * only from win2unix or bi-directional. * req->direction = * INTERNAL USE. Used by idmapd to set various * flags (_IDMAP_F_xxxx) to aid in processing * of the request. * req->id2.idtype = * INTERNAL USE. Initially this is the requested target * type and is used to initialize res->id.idtype. * ad_lookup_batch() uses this field temporarily to store * sid_type obtained by the batched AD lookups and after * use resets it to IDMAP_NONE to prevent xdr from * mis-interpreting the contents of req->id2. * req->id2.idmap_id_u.uid = * INTERNAL USE. If the AD lookup finds IDMU data * (uidNumber or gidNumber, depending on the type of * the entry), it's left here. */ /* * This function does the following: * 1. Lookup well-known SIDs table. * 2. Check if the given SID is a local-SID and if so extract UID/GID from it. * 3. Lookup cache. * 4. Check if the client does not want new mapping to be allocated * in which case this pass is the final pass. * 5. Set AD lookup flag if it determines that the next stage needs * to do AD lookup. */ idmap_retcode sid2pid_first_pass(lookup_state_t *state, idmap_mapping *req, idmap_id_res *res) { idmap_retcode retcode; int wksid; /* Initialize result */ res->id.idtype = req->id2.idtype; res->id.idmap_id_u.uid = SENTINEL_PID; res->direction = IDMAP_DIRECTION_UNDEF; wksid = 0; if (EMPTY_STRING(req->id1.idmap_id_u.sid.prefix)) { /* They have to give us *something* to work with! */ if (req->id1name == NULL) { retcode = IDMAP_ERR_ARG; goto out; } /* sanitize sidprefix */ free(req->id1.idmap_id_u.sid.prefix); req->id1.idmap_id_u.sid.prefix = NULL; /* Allow for a fully-qualified name in the "name" parameter */ if (req->id1domain == NULL) { char *p; p = strchr(req->id1name, '@'); if (p != NULL) { char *q; q = req->id1name; req->id1name = strndup(q, p - req->id1name); req->id1domain = strdup(p+1); free(q); if (req->id1name == NULL || req->id1domain == NULL) { retcode = IDMAP_ERR_MEMORY; goto out; } } } } /* Lookup well-known SIDs table */ retcode = lookup_wksids_sid2pid(req, res, &wksid); /* * Note that IDMAP_SUCCESS means that we found a hardwired mapping. * If we found a well-known identity but no mapping, wksid==true and * retcode==IDMAP_ERR_NOTFOUND. */ if (retcode != IDMAP_ERR_NOTFOUND) goto out; if (!wksid) { /* Check if this is a localsid */ retcode = lookup_localsid2pid(req, res); if (retcode != IDMAP_ERR_NOTFOUND) goto out; if (ALLOW_WK_OR_LOCAL_SIDS_ONLY(req)) { retcode = IDMAP_ERR_NONE_GENERATED; goto out; } } /* * If this is a name-based request and we don't have a domain, * use the default domain. Note that the well-known identity * cases will have supplied a SID prefix already, and that we * don't (yet?) support looking up a local user through a Windows * style name. */ if (req->id1.idmap_id_u.sid.prefix == NULL && req->id1name != NULL && req->id1domain == NULL) { if (state->defdom == NULL) { retcode = IDMAP_ERR_DOMAIN_NOTFOUND; goto out; } req->id1domain = strdup(state->defdom); if (req->id1domain == NULL) { retcode = IDMAP_ERR_MEMORY; goto out; } } /* Lookup cache */ retcode = lookup_cache_sid2pid(state->cache, req, res); if (retcode != IDMAP_ERR_NOTFOUND) goto out; if (DO_NOT_ALLOC_NEW_ID_MAPPING(req) || AVOID_NAMESERVICE(req)) { retcode = IDMAP_ERR_NONE_GENERATED; goto out; } /* * Failed to find non-expired entry in cache. Next step is * to determine if this request needs to be batched for AD lookup. * * At this point we have either sid or winname or both. If we don't * have both then lookup name_cache for the sid or winname * whichever is missing. If not found then this request will be * batched for AD lookup. */ retcode = lookup_name_cache(state->cache, req, res); if (retcode != IDMAP_SUCCESS && retcode != IDMAP_ERR_NOTFOUND) goto out; /* * Set the flag to indicate that we are not done yet so that * subsequent passes considers this request for name-based * mapping and ephemeral mapping. */ state->sid2pid_done = FALSE; req->direction |= _IDMAP_F_NOTDONE; /* * Even if we have both sid and winname, we still may need to batch * this request for AD lookup if we don't have unixname and * directory-based name mapping (AD or mixed) is enabled. * We avoid AD lookup for well-known SIDs because they don't have * regular AD objects. */ if (retcode != IDMAP_SUCCESS || (!wksid && req->id2name == NULL && AD_OR_MIXED_MODE(res->id.idtype, state)) || (!wksid && res->id.idmap_id_u.uid == SENTINEL_PID && state->directory_based_mapping == DIRECTORY_MAPPING_IDMU)) { retcode = IDMAP_SUCCESS; req->direction |= _IDMAP_F_LOOKUP_AD; state->ad_nqueries++; } else if (NLDAP_MODE(res->id.idtype, state)) { req->direction |= _IDMAP_F_LOOKUP_NLDAP; state->nldap_nqueries++; } out: res->retcode = idmap_stat4prot(retcode); /* * If we are done and there was an error then set fallback pid * in the result. */ if (ARE_WE_DONE(req->direction) && res->retcode != IDMAP_SUCCESS) res->id.idmap_id_u.uid = UID_NOBODY; return (retcode); } /* * Generate SID using the following convention * -<1000 + uid> * -<2^31 + gid> */ static idmap_retcode generate_localsid(idmap_mapping *req, idmap_id_res *res, int is_user, int fallback) { free(res->id.idmap_id_u.sid.prefix); res->id.idmap_id_u.sid.prefix = NULL; /* * Diagonal mapping for localSIDs not supported because of the * way we generate localSIDs. */ if (is_user && res->id.idtype == IDMAP_GSID) return (IDMAP_ERR_NOTGROUP); if (!is_user && res->id.idtype == IDMAP_USID) return (IDMAP_ERR_NOTUSER); /* Skip 1000 UIDs */ if (is_user && req->id1.idmap_id_u.uid + LOCALRID_UID_MIN > LOCALRID_UID_MAX) return (IDMAP_ERR_NOMAPPING); RDLOCK_CONFIG(); /* * machine_sid is never NULL because if it is we won't be here. * No need to assert because stdrup(NULL) will core anyways. */ res->id.idmap_id_u.sid.prefix = strdup(_idmapdstate.cfg->pgcfg.machine_sid); if (res->id.idmap_id_u.sid.prefix == NULL) { UNLOCK_CONFIG(); idmapdlog(LOG_ERR, "Out of memory"); return (IDMAP_ERR_MEMORY); } UNLOCK_CONFIG(); res->id.idmap_id_u.sid.rid = (is_user) ? req->id1.idmap_id_u.uid + LOCALRID_UID_MIN : req->id1.idmap_id_u.gid + LOCALRID_GID_MIN; res->direction = IDMAP_DIRECTION_BI; if (res->id.idtype == IDMAP_SID) res->id.idtype = is_user ? IDMAP_USID : IDMAP_GSID; if (!fallback) { res->info.how.map_type = IDMAP_MAP_TYPE_LOCAL_SID; res->info.src = IDMAP_MAP_SRC_ALGORITHMIC; } /* * Don't update name_cache because local sids don't have * valid windows names. */ req->direction |= _IDMAP_F_DONT_UPDATE_NAMECACHE; return (IDMAP_SUCCESS); } static idmap_retcode lookup_localsid2pid(idmap_mapping *req, idmap_id_res *res) { char *sidprefix; uint32_t rid; int s; /* * If the sidprefix == localsid then UID = last RID - 1000 or * GID = last RID - 2^31. */ if ((sidprefix = req->id1.idmap_id_u.sid.prefix) == NULL) /* This means we are looking up by winname */ return (IDMAP_ERR_NOTFOUND); rid = req->id1.idmap_id_u.sid.rid; RDLOCK_CONFIG(); s = (_idmapdstate.cfg->pgcfg.machine_sid) ? strcasecmp(sidprefix, _idmapdstate.cfg->pgcfg.machine_sid) : 1; UNLOCK_CONFIG(); /* * If the given sidprefix does not match machine_sid then this is * not a local SID. */ if (s != 0) return (IDMAP_ERR_NOTFOUND); switch (res->id.idtype) { case IDMAP_UID: if (rid < LOCALRID_UID_MIN || rid > LOCALRID_UID_MAX) return (IDMAP_ERR_ARG); res->id.idmap_id_u.uid = rid - LOCALRID_UID_MIN; break; case IDMAP_GID: if (rid < LOCALRID_GID_MIN) return (IDMAP_ERR_ARG); res->id.idmap_id_u.gid = rid - LOCALRID_GID_MIN; break; case IDMAP_POSIXID: if (rid >= LOCALRID_GID_MIN) { res->id.idmap_id_u.gid = rid - LOCALRID_GID_MIN; res->id.idtype = IDMAP_GID; } else if (rid >= LOCALRID_UID_MIN) { res->id.idmap_id_u.uid = rid - LOCALRID_UID_MIN; res->id.idtype = IDMAP_UID; } else { return (IDMAP_ERR_ARG); } break; default: return (IDMAP_ERR_NOTSUPPORTED); } res->info.how.map_type = IDMAP_MAP_TYPE_LOCAL_SID; res->info.src = IDMAP_MAP_SRC_ALGORITHMIC; return (IDMAP_SUCCESS); } /* * Name service lookup by unixname to get pid */ static idmap_retcode ns_lookup_byname(const char *name, const char *lower_name, idmap_id *id) { struct passwd pwd, *pwdp; struct group grp, *grpp; char *buf; static size_t pwdbufsiz = 0; static size_t grpbufsiz = 0; switch (id->idtype) { case IDMAP_UID: if (pwdbufsiz == 0) pwdbufsiz = sysconf(_SC_GETPW_R_SIZE_MAX); buf = alloca(pwdbufsiz); pwdp = getpwnam_r(name, &pwd, buf, pwdbufsiz); if (pwdp == NULL && errno == 0 && lower_name != NULL && name != lower_name && strcmp(name, lower_name) != 0) pwdp = getpwnam_r(lower_name, &pwd, buf, pwdbufsiz); if (pwdp == NULL) { if (errno == 0) return (IDMAP_ERR_NOTFOUND); else return (IDMAP_ERR_INTERNAL); } id->idmap_id_u.uid = pwd.pw_uid; break; case IDMAP_GID: if (grpbufsiz == 0) grpbufsiz = sysconf(_SC_GETGR_R_SIZE_MAX); buf = alloca(grpbufsiz); grpp = getgrnam_r(name, &grp, buf, grpbufsiz); if (grpp == NULL && errno == 0 && lower_name != NULL && name != lower_name && strcmp(name, lower_name) != 0) grpp = getgrnam_r(lower_name, &grp, buf, grpbufsiz); if (grpp == NULL) { if (errno == 0) return (IDMAP_ERR_NOTFOUND); else return (IDMAP_ERR_INTERNAL); } id->idmap_id_u.gid = grp.gr_gid; break; default: return (IDMAP_ERR_ARG); } return (IDMAP_SUCCESS); } /* * Name service lookup by pid to get unixname */ static idmap_retcode ns_lookup_bypid(uid_t pid, int is_user, char **unixname) { struct passwd pwd; struct group grp; char *buf; static size_t pwdbufsiz = 0; static size_t grpbufsiz = 0; if (is_user) { if (pwdbufsiz == 0) pwdbufsiz = sysconf(_SC_GETPW_R_SIZE_MAX); buf = alloca(pwdbufsiz); errno = 0; if (getpwuid_r(pid, &pwd, buf, pwdbufsiz) == NULL) { if (errno == 0) return (IDMAP_ERR_NOTFOUND); else return (IDMAP_ERR_INTERNAL); } *unixname = strdup(pwd.pw_name); } else { if (grpbufsiz == 0) grpbufsiz = sysconf(_SC_GETGR_R_SIZE_MAX); buf = alloca(grpbufsiz); errno = 0; if (getgrgid_r(pid, &grp, buf, grpbufsiz) == NULL) { if (errno == 0) return (IDMAP_ERR_NOTFOUND); else return (IDMAP_ERR_INTERNAL); } *unixname = strdup(grp.gr_name); } if (*unixname == NULL) return (IDMAP_ERR_MEMORY); return (IDMAP_SUCCESS); } /* * Name-based mapping * * Case 1: If no rule matches do ephemeral * * Case 2: If rule matches and unixname is "" then return no mapping. * * Case 3: If rule matches and unixname is specified then lookup name * service using the unixname. If unixname not found then return no mapping. * * Case 4: If rule matches and unixname is * then lookup name service * using winname as the unixname. If unixname not found then process * other rules using the lookup order. If no other rule matches then do * ephemeral. Otherwise, based on the matched rule do Case 2 or 3 or 4. * This allows us to specify a fallback unixname per _domain_ or no mapping * instead of the default behaviour of doing ephemeral mapping. * * Example 1: * *@sfbay == * * If looking up windows users foo@sfbay and foo does not exists in * the name service then foo@sfbay will be mapped to an ephemeral id. * * Example 2: * *@sfbay == * * *@sfbay => guest * If looking up windows users foo@sfbay and foo does not exists in * the name service then foo@sfbay will be mapped to guest. * * Example 3: * *@sfbay == * * *@sfbay => "" * If looking up windows users foo@sfbay and foo does not exists in * the name service then we will return no mapping for foo@sfbay. * */ static idmap_retcode name_based_mapping_sid2pid(lookup_state_t *state, idmap_mapping *req, idmap_id_res *res) { const char *unixname, *windomain; char *sql = NULL, *errmsg = NULL, *lower_winname = NULL; idmap_retcode retcode; char *end, *lower_unixname, *winname; const char **values; sqlite_vm *vm = NULL; int ncol, r, is_user, is_wuser; idmap_namerule *rule = &res->info.how.idmap_how_u.rule; int direction; const char *me = "name_based_mapping_sid2pid"; assert(req->id1name != NULL); /* We have winname */ assert(req->id2name == NULL); /* We don't have unixname */ winname = req->id1name; windomain = req->id1domain; switch (req->id1.idtype) { case IDMAP_USID: is_wuser = 1; break; case IDMAP_GSID: is_wuser = 0; break; default: idmapdlog(LOG_ERR, "%s: Unable to determine if the " "given Windows id is user or group.", me); return (IDMAP_ERR_INTERNAL); } switch (res->id.idtype) { case IDMAP_UID: is_user = 1; break; case IDMAP_GID: is_user = 0; break; case IDMAP_POSIXID: is_user = is_wuser; res->id.idtype = is_user ? IDMAP_UID : IDMAP_GID; break; } if (windomain == NULL) windomain = ""; if ((lower_winname = tolower_u8(winname)) == NULL) lower_winname = winname; /* hope for the best */ sql = sqlite_mprintf( "SELECT unixname, u2w_order, winname_display, windomain, is_nt4 " "FROM namerules WHERE " "w2u_order > 0 AND is_user = %d AND is_wuser = %d AND " "(winname = %Q OR winname = '*') AND " "(windomain = %Q OR windomain = '*') " "ORDER BY w2u_order ASC;", is_user, is_wuser, lower_winname, windomain); if (sql == NULL) { idmapdlog(LOG_ERR, "Out of memory"); retcode = IDMAP_ERR_MEMORY; goto out; } if (sqlite_compile(state->db, sql, NULL, &vm, &errmsg) != SQLITE_OK) { retcode = IDMAP_ERR_INTERNAL; idmapdlog(LOG_ERR, "%s: database error (%s)", me, CHECK_NULL(errmsg)); sqlite_freemem(errmsg); goto out; } for (;;) { r = sqlite_step(vm, &ncol, &values, NULL); assert(r != SQLITE_LOCKED && r != SQLITE_BUSY); if (r == SQLITE_ROW) { if (ncol < 5) { retcode = IDMAP_ERR_INTERNAL; goto out; } if (values[0] == NULL) { retcode = IDMAP_ERR_INTERNAL; goto out; } if (values[1] != NULL) direction = (strtol(values[1], &end, 10) == 0)? IDMAP_DIRECTION_W2U:IDMAP_DIRECTION_BI; else direction = IDMAP_DIRECTION_W2U; if (EMPTY_NAME(values[0])) { idmap_namerule_set(rule, values[3], values[2], values[0], is_wuser, is_user, strtol(values[4], &end, 10), direction); retcode = IDMAP_ERR_NOMAPPING; goto out; } if (values[0][0] == '*') { unixname = winname; lower_unixname = lower_winname; } else { unixname = values[0]; lower_unixname = NULL; } retcode = ns_lookup_byname(unixname, lower_unixname, &res->id); if (retcode == IDMAP_ERR_NOTFOUND) { if (values[0][0] == '*') /* Case 4 */ continue; else { /* Case 3 */ idmap_namerule_set(rule, values[3], values[2], values[0], is_wuser, is_user, strtol(values[4], &end, 10), direction); retcode = IDMAP_ERR_NOMAPPING; } } goto out; } else if (r == SQLITE_DONE) { retcode = IDMAP_ERR_NOTFOUND; goto out; } else { (void) sqlite_finalize(vm, &errmsg); vm = NULL; idmapdlog(LOG_ERR, "%s: database error (%s)", me, CHECK_NULL(errmsg)); sqlite_freemem(errmsg); retcode = IDMAP_ERR_INTERNAL; goto out; } } out: if (sql != NULL) sqlite_freemem(sql); if (retcode == IDMAP_SUCCESS) { if (values[1] != NULL) res->direction = (strtol(values[1], &end, 10) == 0)? IDMAP_DIRECTION_W2U:IDMAP_DIRECTION_BI; else res->direction = IDMAP_DIRECTION_W2U; req->id2name = strdup(unixname); if (req->id2name == NULL) { retcode = IDMAP_ERR_MEMORY; } } if (retcode == IDMAP_SUCCESS) { idmap_namerule_set(rule, values[3], values[2], values[0], is_wuser, is_user, strtol(values[4], &end, 10), res->direction); } if (retcode != IDMAP_ERR_NOTFOUND) { res->info.how.map_type = IDMAP_MAP_TYPE_RULE_BASED; res->info.src = IDMAP_MAP_SRC_NEW; } if (lower_winname != NULL && lower_winname != winname) free(lower_winname); if (vm != NULL) (void) sqlite_finalize(vm, NULL); return (retcode); } static int get_next_eph_uid(uid_t *next_uid) { uid_t uid; gid_t gid; int err; *next_uid = (uid_t)-1; uid = _idmapdstate.next_uid++; if (uid >= _idmapdstate.limit_uid) { if ((err = allocids(0, 8192, &uid, 0, &gid)) != 0) return (err); _idmapdstate.limit_uid = uid + 8192; _idmapdstate.next_uid = uid; } *next_uid = uid; return (0); } static int get_next_eph_gid(gid_t *next_gid) { uid_t uid; gid_t gid; int err; *next_gid = (uid_t)-1; gid = _idmapdstate.next_gid++; if (gid >= _idmapdstate.limit_gid) { if ((err = allocids(0, 0, &uid, 8192, &gid)) != 0) return (err); _idmapdstate.limit_gid = gid + 8192; _idmapdstate.next_gid = gid; } *next_gid = gid; return (0); } static int gethash(const char *str, uint32_t num, uint_t htsize) { uint_t hval, i, len; if (str == NULL) return (0); for (len = strlen(str), hval = 0, i = 0; i < len; i++) { hval += str[i]; hval += (hval << 10); hval ^= (hval >> 6); } for (str = (const char *)&num, i = 0; i < sizeof (num); i++) { hval += str[i]; hval += (hval << 10); hval ^= (hval >> 6); } hval += (hval << 3); hval ^= (hval >> 11); hval += (hval << 15); return (hval % htsize); } static int get_from_sid_history(lookup_state_t *state, const char *prefix, uint32_t rid, uid_t *pid) { uint_t next, key; uint_t htsize = state->sid_history_size; idmap_sid *sid; next = gethash(prefix, rid, htsize); while (next != htsize) { key = state->sid_history[next].key; if (key == htsize) return (0); sid = &state->batch->idmap_mapping_batch_val[key].id1. idmap_id_u.sid; if (sid->rid == rid && strcmp(sid->prefix, prefix) == 0) { *pid = state->result->ids.ids_val[key].id. idmap_id_u.uid; return (1); } next = state->sid_history[next].next; } return (0); } static void add_to_sid_history(lookup_state_t *state, const char *prefix, uint32_t rid) { uint_t hash, next; uint_t htsize = state->sid_history_size; hash = next = gethash(prefix, rid, htsize); while (state->sid_history[next].key != htsize) { next++; next %= htsize; } state->sid_history[next].key = state->curpos; if (hash == next) return; state->sid_history[next].next = state->sid_history[hash].next; state->sid_history[hash].next = next; } void cleanup_lookup_state(lookup_state_t *state) { free(state->sid_history); free(state->ad_unixuser_attr); free(state->ad_unixgroup_attr); free(state->nldap_winname_attr); free(state->defdom); } /* ARGSUSED */ static idmap_retcode dynamic_ephemeral_mapping(lookup_state_t *state, idmap_mapping *req, idmap_id_res *res) { uid_t next_pid; res->direction = IDMAP_DIRECTION_BI; if (IS_EPHEMERAL(res->id.idmap_id_u.uid)) { res->info.how.map_type = IDMAP_MAP_TYPE_EPHEMERAL; res->info.src = IDMAP_MAP_SRC_CACHE; return (IDMAP_SUCCESS); } if (state->sid_history != NULL && get_from_sid_history(state, req->id1.idmap_id_u.sid.prefix, req->id1.idmap_id_u.sid.rid, &next_pid)) { res->id.idmap_id_u.uid = next_pid; res->info.how.map_type = IDMAP_MAP_TYPE_EPHEMERAL; res->info.src = IDMAP_MAP_SRC_NEW; return (IDMAP_SUCCESS); } if (res->id.idtype == IDMAP_UID) { if (get_next_eph_uid(&next_pid) != 0) return (IDMAP_ERR_INTERNAL); res->id.idmap_id_u.uid = next_pid; } else { if (get_next_eph_gid(&next_pid) != 0) return (IDMAP_ERR_INTERNAL); res->id.idmap_id_u.gid = next_pid; } res->info.how.map_type = IDMAP_MAP_TYPE_EPHEMERAL; res->info.src = IDMAP_MAP_SRC_NEW; if (state->sid_history != NULL) add_to_sid_history(state, req->id1.idmap_id_u.sid.prefix, req->id1.idmap_id_u.sid.rid); return (IDMAP_SUCCESS); } idmap_retcode sid2pid_second_pass(lookup_state_t *state, idmap_mapping *req, idmap_id_res *res) { idmap_retcode retcode; /* Check if second pass is needed */ if (ARE_WE_DONE(req->direction)) return (res->retcode); /* Get status from previous pass */ retcode = res->retcode; if (retcode != IDMAP_SUCCESS && state->eph_map_unres_sids && !EMPTY_STRING(req->id1.idmap_id_u.sid.prefix) && EMPTY_STRING(req->id1name)) { /* * We are asked to map an unresolvable SID to a UID or * GID, but, which? We'll treat all unresolvable SIDs * as users unless the caller specified which of a UID * or GID they want. */ if (req->id1.idtype == IDMAP_SID) req->id1.idtype = IDMAP_USID; if (res->id.idtype == IDMAP_POSIXID) res->id.idtype = IDMAP_UID; goto do_eph; } if (retcode != IDMAP_SUCCESS) goto out; /* * There are two ways we might get here with a Posix ID: * - It could be from an expired ephemeral cache entry. * - It could be from IDMU. * If it's from IDMU, we need to look up the name, for name-based * requests and the cache. */ if (!IS_EPHEMERAL(res->id.idmap_id_u.uid) && res->id.idmap_id_u.uid != SENTINEL_PID) { if (req->id2name == NULL) { /* * If the lookup fails, go ahead anyway. * The general UNIX rule is that it's OK to * have a UID or GID that isn't in the * name service. */ (void) ns_lookup_bypid(res->id.idmap_id_u.uid, res->id.idtype == IDMAP_UID, &req->id2name); } goto out; } /* * If directory-based name mapping is enabled then the unixname * may already have been retrieved from the AD object (AD-mode or * mixed-mode) or from native LDAP object (nldap-mode) -- done. */ if (req->id2name != NULL) { assert(res->id.idtype != IDMAP_POSIXID); if (AD_MODE(res->id.idtype, state)) res->direction = IDMAP_DIRECTION_BI; else if (NLDAP_MODE(res->id.idtype, state)) res->direction = IDMAP_DIRECTION_BI; else if (MIXED_MODE(res->id.idtype, state)) res->direction = IDMAP_DIRECTION_W2U; /* * Special case: (1) If the ad_unixuser_attr and * ad_unixgroup_attr uses the same attribute * name and (2) if this is a diagonal mapping * request and (3) the unixname has been retrieved * from the AD object -- then we ignore it and fallback * to name-based mapping rules and ephemeral mapping * * Example: * Properties: * config/ad_unixuser_attr = "unixname" * config/ad_unixgroup_attr = "unixname" * AD user object: * dn: cn=bob ... * objectclass: user * sam: bob * unixname: bob1234 * AD group object: * dn: cn=winadmins ... * objectclass: group * sam: winadmins * unixname: unixadmins * * In this example whether "unixname" refers to a unixuser * or unixgroup depends upon the AD object. * * $idmap show -c winname:bob gid * AD lookup by "samAccountName=bob" for * "ad_unixgroup_attr (i.e unixname)" for directory-based * mapping would get "bob1234" which is not what we want. * Now why not getgrnam_r("bob1234") and use it if it * is indeed a unixgroup? That's because Unix can have * users and groups with the same name and we clearly * don't know the intention of the admin here. * Therefore we ignore this and fallback to name-based * mapping rules or ephemeral mapping. */ if ((AD_MODE(res->id.idtype, state) || MIXED_MODE(res->id.idtype, state)) && state->ad_unixuser_attr != NULL && state->ad_unixgroup_attr != NULL && strcasecmp(state->ad_unixuser_attr, state->ad_unixgroup_attr) == 0 && ((req->id1.idtype == IDMAP_USID && res->id.idtype == IDMAP_GID) || (req->id1.idtype == IDMAP_GSID && res->id.idtype == IDMAP_UID))) { free(req->id2name); req->id2name = NULL; res->id.idmap_id_u.uid = SENTINEL_PID; /* fallback */ } else { if (res->id.idmap_id_u.uid == SENTINEL_PID) retcode = ns_lookup_byname(req->id2name, NULL, &res->id); /* * If ns_lookup_byname() fails that means the * unixname (req->id2name), which was obtained * from the AD object by directory-based mapping, * is not a valid Unix user/group and therefore * we return the error to the client instead of * doing rule-based mapping or ephemeral mapping. * This way the client can detect the issue. */ goto out; } } /* Free any mapping info from Directory based mapping */ if (res->info.how.map_type != IDMAP_MAP_TYPE_UNKNOWN) idmap_info_free(&res->info); /* * If we don't have unixname then evaluate local name-based * mapping rules. */ retcode = name_based_mapping_sid2pid(state, req, res); if (retcode != IDMAP_ERR_NOTFOUND) goto out; do_eph: /* If not found, do ephemeral mapping */ retcode = dynamic_ephemeral_mapping(state, req, res); out: res->retcode = idmap_stat4prot(retcode); if (res->retcode != IDMAP_SUCCESS) { req->direction = _IDMAP_F_DONE; res->id.idmap_id_u.uid = UID_NOBODY; } if (!ARE_WE_DONE(req->direction)) state->sid2pid_done = FALSE; return (retcode); } idmap_retcode update_cache_pid2sid(lookup_state_t *state, idmap_mapping *req, idmap_id_res *res) { char *sql = NULL; idmap_retcode retcode; char *map_dn = NULL; char *map_attr = NULL; char *map_value = NULL; char *map_windomain = NULL; char *map_winname = NULL; char *map_unixname = NULL; int map_is_nt4 = FALSE; /* Check if we need to cache anything */ if (ARE_WE_DONE(req->direction)) return (IDMAP_SUCCESS); /* We don't cache negative entries */ if (res->retcode != IDMAP_SUCCESS) return (IDMAP_SUCCESS); assert(res->direction != IDMAP_DIRECTION_UNDEF); assert(req->id1.idmap_id_u.uid != SENTINEL_PID); assert(res->id.idtype != IDMAP_SID); /* * If we've gotten to this point and we *still* don't know the * unixname, well, we'd like to have it now for the cache. * * If we truly always need it for the cache, we should probably * look it up once at the beginning, rather than "at need" in * several places as is now done. However, it's not really clear * that we *do* need it in the cache; there's a decent argument * that the cache should contain only SIDs and PIDs, so we'll * leave our options open by doing it "at need" here too. * * If we can't find it... c'est la vie. */ if (req->id1name == NULL) { (void) ns_lookup_bypid(req->id1.idmap_id_u.uid, req->id1.idtype == IDMAP_UID, &req->id1name); } assert(res->info.how.map_type != IDMAP_MAP_TYPE_UNKNOWN); switch (res->info.how.map_type) { case IDMAP_MAP_TYPE_DS_AD: map_dn = res->info.how.idmap_how_u.ad.dn; map_attr = res->info.how.idmap_how_u.ad.attr; map_value = res->info.how.idmap_how_u.ad.value; break; case IDMAP_MAP_TYPE_DS_NLDAP: map_dn = res->info.how.idmap_how_u.nldap.dn; map_attr = res->info.how.idmap_how_u.nldap.attr; map_value = res->info.how.idmap_how_u.nldap.value; break; case IDMAP_MAP_TYPE_RULE_BASED: map_windomain = res->info.how.idmap_how_u.rule.windomain; map_winname = res->info.how.idmap_how_u.rule.winname; map_unixname = res->info.how.idmap_how_u.rule.unixname; map_is_nt4 = res->info.how.idmap_how_u.rule.is_nt4; break; case IDMAP_MAP_TYPE_EPHEMERAL: break; case IDMAP_MAP_TYPE_LOCAL_SID: break; case IDMAP_MAP_TYPE_IDMU: map_dn = res->info.how.idmap_how_u.idmu.dn; map_attr = res->info.how.idmap_how_u.idmu.attr; map_value = res->info.how.idmap_how_u.idmu.value; break; default: /* Dont cache other mapping types */ assert(FALSE); } /* * Using NULL for u2w instead of 0 so that our trigger allows * the same pid to be the destination in multiple entries */ sql = sqlite_mprintf("INSERT OR REPLACE into idmap_cache " "(sidprefix, rid, windomain, canon_winname, pid, unixname, " "is_user, is_wuser, expiration, w2u, u2w, " "map_type, map_dn, map_attr, map_value, map_windomain, " "map_winname, map_unixname, map_is_nt4) " "VALUES(%Q, %u, %Q, %Q, %u, %Q, %d, %d, " "strftime('%%s','now') + 600, %q, 1, " "%d, %Q, %Q, %Q, %Q, %Q, %Q, %d); ", res->id.idmap_id_u.sid.prefix, res->id.idmap_id_u.sid.rid, req->id2domain, req->id2name, req->id1.idmap_id_u.uid, req->id1name, (req->id1.idtype == IDMAP_UID) ? 1 : 0, (res->id.idtype == IDMAP_USID) ? 1 : 0, (res->direction == 0) ? "1" : NULL, res->info.how.map_type, map_dn, map_attr, map_value, map_windomain, map_winname, map_unixname, map_is_nt4); if (sql == NULL) { retcode = IDMAP_ERR_INTERNAL; idmapdlog(LOG_ERR, "Out of memory"); goto out; } retcode = sql_exec_no_cb(state->cache, IDMAP_CACHENAME, sql); if (retcode != IDMAP_SUCCESS) goto out; state->pid2sid_done = FALSE; sqlite_freemem(sql); sql = NULL; /* Check if we need to update namecache */ if (req->direction & _IDMAP_F_DONT_UPDATE_NAMECACHE) goto out; if (req->id2name == NULL) goto out; sql = sqlite_mprintf("INSERT OR REPLACE into name_cache " "(sidprefix, rid, canon_name, domain, type, expiration) " "VALUES(%Q, %u, %Q, %Q, %d, strftime('%%s','now') + 3600); ", res->id.idmap_id_u.sid.prefix, res->id.idmap_id_u.sid.rid, req->id2name, req->id2domain, (res->id.idtype == IDMAP_USID) ? _IDMAP_T_USER : _IDMAP_T_GROUP); if (sql == NULL) { retcode = IDMAP_ERR_INTERNAL; idmapdlog(LOG_ERR, "Out of memory"); goto out; } retcode = sql_exec_no_cb(state->cache, IDMAP_CACHENAME, sql); out: if (!(req->flag & IDMAP_REQ_FLG_MAPPING_INFO)) idmap_info_free(&res->info); if (sql != NULL) sqlite_freemem(sql); return (retcode); } idmap_retcode update_cache_sid2pid(lookup_state_t *state, idmap_mapping *req, idmap_id_res *res) { char *sql = NULL; idmap_retcode retcode; int is_eph_user; char *map_dn = NULL; char *map_attr = NULL; char *map_value = NULL; char *map_windomain = NULL; char *map_winname = NULL; char *map_unixname = NULL; int map_is_nt4 = FALSE; /* Check if we need to cache anything */ if (ARE_WE_DONE(req->direction)) return (IDMAP_SUCCESS); /* We don't cache negative entries */ if (res->retcode != IDMAP_SUCCESS) return (IDMAP_SUCCESS); if (req->direction & _IDMAP_F_EXP_EPH_UID) is_eph_user = 1; else if (req->direction & _IDMAP_F_EXP_EPH_GID) is_eph_user = 0; else is_eph_user = -1; if (is_eph_user >= 0 && !IS_EPHEMERAL(res->id.idmap_id_u.uid)) { sql = sqlite_mprintf("UPDATE idmap_cache " "SET w2u = 0 WHERE " "sidprefix = %Q AND rid = %u AND w2u = 1 AND " "pid >= 2147483648 AND is_user = %d;", req->id1.idmap_id_u.sid.prefix, req->id1.idmap_id_u.sid.rid, is_eph_user); if (sql == NULL) { retcode = IDMAP_ERR_INTERNAL; idmapdlog(LOG_ERR, "Out of memory"); goto out; } retcode = sql_exec_no_cb(state->cache, IDMAP_CACHENAME, sql); if (retcode != IDMAP_SUCCESS) goto out; sqlite_freemem(sql); sql = NULL; } assert(res->direction != IDMAP_DIRECTION_UNDEF); assert(res->id.idmap_id_u.uid != SENTINEL_PID); switch (res->info.how.map_type) { case IDMAP_MAP_TYPE_DS_AD: map_dn = res->info.how.idmap_how_u.ad.dn; map_attr = res->info.how.idmap_how_u.ad.attr; map_value = res->info.how.idmap_how_u.ad.value; break; case IDMAP_MAP_TYPE_DS_NLDAP: map_dn = res->info.how.idmap_how_u.nldap.dn; map_attr = res->info.how.idmap_how_u.ad.attr; map_value = res->info.how.idmap_how_u.nldap.value; break; case IDMAP_MAP_TYPE_RULE_BASED: map_windomain = res->info.how.idmap_how_u.rule.windomain; map_winname = res->info.how.idmap_how_u.rule.winname; map_unixname = res->info.how.idmap_how_u.rule.unixname; map_is_nt4 = res->info.how.idmap_how_u.rule.is_nt4; break; case IDMAP_MAP_TYPE_EPHEMERAL: break; case IDMAP_MAP_TYPE_IDMU: map_dn = res->info.how.idmap_how_u.idmu.dn; map_attr = res->info.how.idmap_how_u.idmu.attr; map_value = res->info.how.idmap_how_u.idmu.value; break; default: /* Dont cache other mapping types */ assert(FALSE); } sql = sqlite_mprintf("INSERT OR REPLACE into idmap_cache " "(sidprefix, rid, windomain, canon_winname, pid, unixname, " "is_user, is_wuser, expiration, w2u, u2w, " "map_type, map_dn, map_attr, map_value, map_windomain, " "map_winname, map_unixname, map_is_nt4) " "VALUES(%Q, %u, %Q, %Q, %u, %Q, %d, %d, " "strftime('%%s','now') + 600, 1, %q, " "%d, %Q, %Q, %Q, %Q, %Q, %Q, %d);", req->id1.idmap_id_u.sid.prefix, req->id1.idmap_id_u.sid.rid, (req->id1domain != NULL) ? req->id1domain : "", req->id1name, res->id.idmap_id_u.uid, req->id2name, (res->id.idtype == IDMAP_UID) ? 1 : 0, (req->id1.idtype == IDMAP_USID) ? 1 : 0, (res->direction == 0) ? "1" : NULL, res->info.how.map_type, map_dn, map_attr, map_value, map_windomain, map_winname, map_unixname, map_is_nt4); if (sql == NULL) { retcode = IDMAP_ERR_INTERNAL; idmapdlog(LOG_ERR, "Out of memory"); goto out; } retcode = sql_exec_no_cb(state->cache, IDMAP_CACHENAME, sql); if (retcode != IDMAP_SUCCESS) goto out; state->sid2pid_done = FALSE; sqlite_freemem(sql); sql = NULL; /* Check if we need to update namecache */ if (req->direction & _IDMAP_F_DONT_UPDATE_NAMECACHE) goto out; if (EMPTY_STRING(req->id1name)) goto out; sql = sqlite_mprintf("INSERT OR REPLACE into name_cache " "(sidprefix, rid, canon_name, domain, type, expiration) " "VALUES(%Q, %u, %Q, %Q, %d, strftime('%%s','now') + 3600); ", req->id1.idmap_id_u.sid.prefix, req->id1.idmap_id_u.sid.rid, req->id1name, req->id1domain, (req->id1.idtype == IDMAP_USID) ? _IDMAP_T_USER : _IDMAP_T_GROUP); if (sql == NULL) { retcode = IDMAP_ERR_INTERNAL; idmapdlog(LOG_ERR, "Out of memory"); goto out; } retcode = sql_exec_no_cb(state->cache, IDMAP_CACHENAME, sql); out: if (!(req->flag & IDMAP_REQ_FLG_MAPPING_INFO)) idmap_info_free(&res->info); if (sql != NULL) sqlite_freemem(sql); return (retcode); } static idmap_retcode lookup_cache_pid2sid(sqlite *cache, idmap_mapping *req, idmap_id_res *res, int is_user) { char *end; char *sql = NULL; const char **values; sqlite_vm *vm = NULL; int ncol; idmap_retcode retcode = IDMAP_SUCCESS; time_t curtime; idmap_id_type idtype; /* Current time */ errno = 0; if ((curtime = time(NULL)) == (time_t)-1) { idmapdlog(LOG_ERR, "Failed to get current time (%s)", strerror(errno)); retcode = IDMAP_ERR_INTERNAL; goto out; } /* SQL to lookup the cache by pid or by unixname */ if (req->id1.idmap_id_u.uid != SENTINEL_PID) { sql = sqlite_mprintf("SELECT sidprefix, rid, " "canon_winname, windomain, w2u, is_wuser, " "map_type, map_dn, map_attr, map_value, map_windomain, " "map_winname, map_unixname, map_is_nt4 " "FROM idmap_cache WHERE " "pid = %u AND u2w = 1 AND is_user = %d AND " "(pid >= 2147483648 OR " "(expiration = 0 OR expiration ISNULL OR " "expiration > %d));", req->id1.idmap_id_u.uid, is_user, curtime); } else if (req->id1name != NULL) { sql = sqlite_mprintf("SELECT sidprefix, rid, " "canon_winname, windomain, w2u, is_wuser, " "map_type, map_dn, map_attr, map_value, map_windomain, " "map_winname, map_unixname, map_is_nt4 " "FROM idmap_cache WHERE " "unixname = %Q AND u2w = 1 AND is_user = %d AND " "(pid >= 2147483648 OR " "(expiration = 0 OR expiration ISNULL OR " "expiration > %d));", req->id1name, is_user, curtime); } else { retcode = IDMAP_ERR_ARG; goto out; } if (sql == NULL) { idmapdlog(LOG_ERR, "Out of memory"); retcode = IDMAP_ERR_MEMORY; goto out; } retcode = sql_compile_n_step_once( cache, sql, &vm, &ncol, 14, &values); sqlite_freemem(sql); if (retcode == IDMAP_ERR_NOTFOUND) goto out; else if (retcode == IDMAP_SUCCESS) { /* sanity checks */ if (values[0] == NULL || values[1] == NULL) { retcode = IDMAP_ERR_CACHE; goto out; } switch (res->id.idtype) { case IDMAP_SID: case IDMAP_USID: case IDMAP_GSID: idtype = strtol(values[5], &end, 10) == 1 ? IDMAP_USID : IDMAP_GSID; if (res->id.idtype == IDMAP_USID && idtype != IDMAP_USID) { retcode = IDMAP_ERR_NOTUSER; goto out; } else if (res->id.idtype == IDMAP_GSID && idtype != IDMAP_GSID) { retcode = IDMAP_ERR_NOTGROUP; goto out; } res->id.idtype = idtype; res->id.idmap_id_u.sid.rid = strtoul(values[1], &end, 10); res->id.idmap_id_u.sid.prefix = strdup(values[0]); if (res->id.idmap_id_u.sid.prefix == NULL) { idmapdlog(LOG_ERR, "Out of memory"); retcode = IDMAP_ERR_MEMORY; goto out; } if (values[4] != NULL) res->direction = (strtol(values[4], &end, 10) == 0)? IDMAP_DIRECTION_U2W:IDMAP_DIRECTION_BI; else res->direction = IDMAP_DIRECTION_U2W; if (values[2] == NULL) break; req->id2name = strdup(values[2]); if (req->id2name == NULL) { idmapdlog(LOG_ERR, "Out of memory"); retcode = IDMAP_ERR_MEMORY; goto out; } if (values[3] == NULL) break; req->id2domain = strdup(values[3]); if (req->id2domain == NULL) { idmapdlog(LOG_ERR, "Out of memory"); retcode = IDMAP_ERR_MEMORY; goto out; } break; default: retcode = IDMAP_ERR_NOTSUPPORTED; break; } if (req->flag & IDMAP_REQ_FLG_MAPPING_INFO) { res->info.src = IDMAP_MAP_SRC_CACHE; res->info.how.map_type = strtoul(values[6], &end, 10); switch (res->info.how.map_type) { case IDMAP_MAP_TYPE_DS_AD: res->info.how.idmap_how_u.ad.dn = strdup(values[7]); res->info.how.idmap_how_u.ad.attr = strdup(values[8]); res->info.how.idmap_how_u.ad.value = strdup(values[9]); break; case IDMAP_MAP_TYPE_DS_NLDAP: res->info.how.idmap_how_u.nldap.dn = strdup(values[7]); res->info.how.idmap_how_u.nldap.attr = strdup(values[8]); res->info.how.idmap_how_u.nldap.value = strdup(values[9]); break; case IDMAP_MAP_TYPE_RULE_BASED: res->info.how.idmap_how_u.rule.windomain = strdup(values[10]); res->info.how.idmap_how_u.rule.winname = strdup(values[11]); res->info.how.idmap_how_u.rule.unixname = strdup(values[12]); res->info.how.idmap_how_u.rule.is_nt4 = strtoul(values[13], &end, 10); res->info.how.idmap_how_u.rule.is_user = is_user; res->info.how.idmap_how_u.rule.is_wuser = strtol(values[5], &end, 10); break; case IDMAP_MAP_TYPE_EPHEMERAL: break; case IDMAP_MAP_TYPE_LOCAL_SID: break; case IDMAP_MAP_TYPE_KNOWN_SID: break; case IDMAP_MAP_TYPE_IDMU: res->info.how.idmap_how_u.idmu.dn = strdup(values[7]); res->info.how.idmap_how_u.idmu.attr = strdup(values[8]); res->info.how.idmap_how_u.idmu.value = strdup(values[9]); break; default: /* Unknown mapping type */ assert(FALSE); } } } out: if (vm != NULL) (void) sqlite_finalize(vm, NULL); return (retcode); } /* * Given: * cache sqlite handle * name Windows user name * domain Windows domain name * * Return: Error code * * *canonname Canonical name (if canonname is non-NULL) [1] * *sidprefix SID prefix [1] * *rid RID * *type Type of name * * [1] malloc'ed, NULL on error */ static idmap_retcode lookup_cache_name2sid(sqlite *cache, const char *name, const char *domain, char **canonname, char **sidprefix, idmap_rid_t *rid, int *type) { char *end, *lower_name; char *sql; const char **values; sqlite_vm *vm = NULL; int ncol; time_t curtime; idmap_retcode retcode; *sidprefix = NULL; if (canonname != NULL) *canonname = NULL; /* Get current time */ errno = 0; if ((curtime = time(NULL)) == (time_t)-1) { idmapdlog(LOG_ERR, "Failed to get current time (%s)", strerror(errno)); retcode = IDMAP_ERR_INTERNAL; goto out; } /* SQL to lookup the cache */ if ((lower_name = tolower_u8(name)) == NULL) lower_name = (char *)name; sql = sqlite_mprintf("SELECT sidprefix, rid, type, canon_name " "FROM name_cache WHERE name = %Q AND domain = %Q AND " "(expiration = 0 OR expiration ISNULL OR " "expiration > %d);", lower_name, domain, curtime); if (lower_name != name) free(lower_name); if (sql == NULL) { idmapdlog(LOG_ERR, "Out of memory"); retcode = IDMAP_ERR_MEMORY; goto out; } retcode = sql_compile_n_step_once(cache, sql, &vm, &ncol, 4, &values); sqlite_freemem(sql); if (retcode != IDMAP_SUCCESS) goto out; if (type != NULL) { if (values[2] == NULL) { retcode = IDMAP_ERR_CACHE; goto out; } *type = strtol(values[2], &end, 10); } if (values[0] == NULL || values[1] == NULL) { retcode = IDMAP_ERR_CACHE; goto out; } if (canonname != NULL) { assert(values[3] != NULL); *canonname = strdup(values[3]); if (*canonname == NULL) { idmapdlog(LOG_ERR, "Out of memory"); retcode = IDMAP_ERR_MEMORY; goto out; } } *sidprefix = strdup(values[0]); if (*sidprefix == NULL) { idmapdlog(LOG_ERR, "Out of memory"); retcode = IDMAP_ERR_MEMORY; goto out; } *rid = strtoul(values[1], &end, 10); retcode = IDMAP_SUCCESS; out: if (vm != NULL) (void) sqlite_finalize(vm, NULL); if (retcode != IDMAP_SUCCESS) { free(*sidprefix); *sidprefix = NULL; if (canonname != NULL) { free(*canonname); *canonname = NULL; } } return (retcode); } static idmap_retcode ad_lookup_by_winname(lookup_state_t *state, const char *name, const char *domain, int eunixtype, char **dn, char **attr, char **value, char **canonname, char **sidprefix, idmap_rid_t *rid, int *wintype, char **unixname) { int retries; idmap_query_state_t *qs = NULL; idmap_retcode rc, retcode; int i; int found_ad = 0; RDLOCK_CONFIG(); if (_idmapdstate.num_gcs > 0) { for (i = 0; i < _idmapdstate.num_gcs && !found_ad; i++) { retries = 0; retry: retcode = idmap_lookup_batch_start( _idmapdstate.gcs[i], 1, _idmapdstate.cfg->pgcfg.directory_based_mapping, _idmapdstate.cfg->pgcfg.default_domain, &qs); if (retcode != IDMAP_SUCCESS) { if (retcode == IDMAP_ERR_RETRIABLE_NET_ERR && retries++ < ADUTILS_DEF_NUM_RETRIES) goto retry; degrade_svc(1, "failed to create request for " "AD lookup by winname"); return (retcode); } restore_svc(); if (state != NULL && i == 0) { /* * Directory based name mapping is only * performed within the joined forest (i == 0). * We don't trust other "trusted" forests to * provide DS-based name mapping information * because AD's definition of "cross-forest * trust" does not encompass this sort of * behavior. */ idmap_lookup_batch_set_unixattr(qs, state->ad_unixuser_attr, state->ad_unixgroup_attr); } retcode = idmap_name2sid_batch_add1(qs, name, domain, eunixtype, dn, attr, value, canonname, sidprefix, rid, wintype, unixname, NULL, &rc); if (retcode == IDMAP_ERR_DOMAIN_NOTFOUND) { idmap_lookup_release_batch(&qs); continue; } found_ad = 1; if (retcode != IDMAP_SUCCESS) idmap_lookup_release_batch(&qs); else retcode = idmap_lookup_batch_end(&qs); if (retcode == IDMAP_ERR_RETRIABLE_NET_ERR && retries++ < ADUTILS_DEF_NUM_RETRIES) goto retry; else if (retcode == IDMAP_ERR_RETRIABLE_NET_ERR) degrade_svc(1, "some AD lookups timed out repeatedly"); } } else { /* No AD case */ retcode = IDMAP_ERR_NO_ACTIVEDIRECTORY; } UNLOCK_CONFIG(); if (retcode != IDMAP_SUCCESS) { idmapdlog(LOG_NOTICE, "AD lookup by winname failed"); return (retcode); } return (rc); } /* * Given: * cache sqlite handle to cache * name Windows user name * domain Windows domain name * local_only if true, don't try AD lookups * * Returns: Error code * * *canonname Canonical name (if non-NULL) [1] * *canondomain Canonical domain (if non-NULL) [1] * *sidprefix SID prefix [1] * *rid RID * *req Request (direction is updated) * * [1] malloc'ed, NULL on error */ idmap_retcode lookup_name2sid( sqlite *cache, const char *name, const char *domain, int *is_wuser, char **canonname, char **canondomain, char **sidprefix, idmap_rid_t *rid, idmap_mapping *req, int local_only) { int type; idmap_retcode retcode; *sidprefix = NULL; if (canonname != NULL) *canonname = NULL; if (canondomain != NULL) *canondomain = NULL; /* Lookup well-known SIDs table */ retcode = lookup_wksids_name2sid(name, domain, canonname, canondomain, sidprefix, rid, &type); if (retcode == IDMAP_SUCCESS) { req->direction |= _IDMAP_F_DONT_UPDATE_NAMECACHE; goto out; } else if (retcode != IDMAP_ERR_NOTFOUND) { return (retcode); } /* Lookup cache */ retcode = lookup_cache_name2sid(cache, name, domain, canonname, sidprefix, rid, &type); if (retcode == IDMAP_SUCCESS) { req->direction |= _IDMAP_F_DONT_UPDATE_NAMECACHE; goto out; } else if (retcode != IDMAP_ERR_NOTFOUND) { return (retcode); } /* * The caller may be using this function to determine if this * request needs to be marked for AD lookup or not * (i.e. _IDMAP_F_LOOKUP_AD) and therefore may not want this * function to AD lookup now. */ if (local_only) return (retcode); /* Lookup AD */ retcode = ad_lookup_by_winname(NULL, name, domain, _IDMAP_T_UNDEF, NULL, NULL, NULL, canonname, sidprefix, rid, &type, NULL); if (retcode != IDMAP_SUCCESS) return (retcode); out: /* * Entry found (cache or Windows lookup) * is_wuser is both input as well as output parameter */ if (*is_wuser == 1 && type != _IDMAP_T_USER) retcode = IDMAP_ERR_NOTUSER; else if (*is_wuser == 0 && type != _IDMAP_T_GROUP) retcode = IDMAP_ERR_NOTGROUP; else if (*is_wuser == -1) { /* Caller wants to know if its user or group */ if (type == _IDMAP_T_USER) *is_wuser = 1; else if (type == _IDMAP_T_GROUP) *is_wuser = 0; else retcode = IDMAP_ERR_SID; } if (retcode == IDMAP_SUCCESS) { /* * If we were asked for a canonical domain and none * of the searches have provided one, assume it's the * supplied domain. */ if (canondomain != NULL && *canondomain == NULL) { *canondomain = strdup(domain); if (*canondomain == NULL) retcode = IDMAP_ERR_MEMORY; } } if (retcode != IDMAP_SUCCESS) { free(*sidprefix); *sidprefix = NULL; if (canonname != NULL) { free(*canonname); *canonname = NULL; } if (canondomain != NULL) { free(*canondomain); *canondomain = NULL; } } return (retcode); } static idmap_retcode name_based_mapping_pid2sid(lookup_state_t *state, const char *unixname, int is_user, idmap_mapping *req, idmap_id_res *res) { const char *winname, *windomain; char *canonname; char *canondomain; char *sql = NULL, *errmsg = NULL; idmap_retcode retcode; char *end; const char **values; sqlite_vm *vm = NULL; int ncol, r; int is_wuser; const char *me = "name_based_mapping_pid2sid"; int non_wild_match = FALSE; idmap_namerule *rule = &res->info.how.idmap_how_u.rule; int direction; assert(unixname != NULL); /* We have unixname */ assert(req->id2name == NULL); /* We don't have winname */ assert(res->id.idmap_id_u.sid.prefix == NULL); /* No SID either */ sql = sqlite_mprintf( "SELECT winname_display, windomain, w2u_order, " "is_wuser, unixname, is_nt4 " "FROM namerules WHERE " "u2w_order > 0 AND is_user = %d AND " "(unixname = %Q OR unixname = '*') " "ORDER BY u2w_order ASC;", is_user, unixname); if (sql == NULL) { idmapdlog(LOG_ERR, "Out of memory"); retcode = IDMAP_ERR_MEMORY; goto out; } if (sqlite_compile(state->db, sql, NULL, &vm, &errmsg) != SQLITE_OK) { retcode = IDMAP_ERR_INTERNAL; idmapdlog(LOG_ERR, "%s: database error (%s)", me, CHECK_NULL(errmsg)); sqlite_freemem(errmsg); goto out; } for (;;) { r = sqlite_step(vm, &ncol, &values, NULL); assert(r != SQLITE_LOCKED && r != SQLITE_BUSY); if (r == SQLITE_ROW) { if (ncol < 6) { retcode = IDMAP_ERR_INTERNAL; goto out; } if (values[0] == NULL) { /* values [1] and [2] can be null */ retcode = IDMAP_ERR_INTERNAL; goto out; } if (values[2] != NULL) direction = (strtol(values[2], &end, 10) == 0)? IDMAP_DIRECTION_U2W:IDMAP_DIRECTION_BI; else direction = IDMAP_DIRECTION_U2W; if (EMPTY_NAME(values[0])) { idmap_namerule_set(rule, values[1], values[0], values[4], is_user, strtol(values[3], &end, 10), strtol(values[5], &end, 10), direction); retcode = IDMAP_ERR_NOMAPPING; goto out; } if (values[0][0] == '*') { winname = unixname; if (non_wild_match) { /* * There were non-wildcard rules * where the Windows identity doesn't * exist. Return no mapping. */ retcode = IDMAP_ERR_NOMAPPING; goto out; } } else { /* Save first non-wild match rule */ if (!non_wild_match) { idmap_namerule_set(rule, values[1], values[0], values[4], is_user, strtol(values[3], &end, 10), strtol(values[5], &end, 10), direction); non_wild_match = TRUE; } winname = values[0]; } is_wuser = res->id.idtype == IDMAP_USID ? 1 : res->id.idtype == IDMAP_GSID ? 0 : -1; if (values[1] != NULL) windomain = values[1]; else if (state->defdom != NULL) windomain = state->defdom; else { idmapdlog(LOG_ERR, "%s: no domain", me); retcode = IDMAP_ERR_DOMAIN_NOTFOUND; goto out; } retcode = lookup_name2sid(state->cache, winname, windomain, &is_wuser, &canonname, &canondomain, &res->id.idmap_id_u.sid.prefix, &res->id.idmap_id_u.sid.rid, req, 0); if (retcode == IDMAP_ERR_NOTFOUND) { continue; } goto out; } else if (r == SQLITE_DONE) { /* * If there were non-wildcard rules where * Windows identity doesn't exist * return no mapping. */ if (non_wild_match) retcode = IDMAP_ERR_NOMAPPING; else retcode = IDMAP_ERR_NOTFOUND; goto out; } else { (void) sqlite_finalize(vm, &errmsg); vm = NULL; idmapdlog(LOG_ERR, "%s: database error (%s)", me, CHECK_NULL(errmsg)); sqlite_freemem(errmsg); retcode = IDMAP_ERR_INTERNAL; goto out; } } out: if (sql != NULL) sqlite_freemem(sql); if (retcode == IDMAP_SUCCESS) { res->id.idtype = is_wuser ? IDMAP_USID : IDMAP_GSID; if (values[2] != NULL) res->direction = (strtol(values[2], &end, 10) == 0)? IDMAP_DIRECTION_U2W:IDMAP_DIRECTION_BI; else res->direction = IDMAP_DIRECTION_U2W; req->id2name = canonname; req->id2domain = canondomain; } if (retcode == IDMAP_SUCCESS) { idmap_namerule_set(rule, values[1], values[0], values[4], is_user, strtol(values[3], &end, 10), strtol(values[5], &end, 10), rule->direction); } if (retcode != IDMAP_ERR_NOTFOUND) { res->info.how.map_type = IDMAP_MAP_TYPE_RULE_BASED; res->info.src = IDMAP_MAP_SRC_NEW; } if (vm != NULL) (void) sqlite_finalize(vm, NULL); return (retcode); } /* * Convention when processing unix2win requests: * * Unix identity: * req->id1name = * unixname if given otherwise unixname found will be placed * here. * req->id1domain = * NOT USED * req->id1.idtype = * Given type (IDMAP_UID or IDMAP_GID) * req->id1..[uid or gid] = * UID/GID if given otherwise UID/GID found will be placed here. * * Windows identity: * req->id2name = * winname found will be placed here. * req->id2domain = * windomain found will be placed here. * res->id.idtype = * Target type initialized from req->id2.idtype. If * it is IDMAP_SID then actual type (IDMAP_USID/GSID) found * will be placed here. * req->id..sid.[prefix, rid] = * SID found will be placed here. * * Others: * res->retcode = * Return status for this request will be placed here. * res->direction = * Direction found will be placed here. Direction * meaning whether the resultant mapping is valid * only from unix2win or bi-directional. * req->direction = * INTERNAL USE. Used by idmapd to set various * flags (_IDMAP_F_xxxx) to aid in processing * of the request. * req->id2.idtype = * INTERNAL USE. Initially this is the requested target * type and is used to initialize res->id.idtype. * ad_lookup_batch() uses this field temporarily to store * sid_type obtained by the batched AD lookups and after * use resets it to IDMAP_NONE to prevent xdr from * mis-interpreting the contents of req->id2. * req->id2..[uid or gid or sid] = * NOT USED */ /* * This function does the following: * 1. Lookup well-known SIDs table. * 2. Lookup cache. * 3. Check if the client does not want new mapping to be allocated * in which case this pass is the final pass. * 4. Set AD/NLDAP lookup flags if it determines that the next stage needs * to do AD/NLDAP lookup. */ idmap_retcode pid2sid_first_pass(lookup_state_t *state, idmap_mapping *req, idmap_id_res *res, int is_user) { idmap_retcode retcode; bool_t gen_localsid_on_err = FALSE; /* Initialize result */ res->id.idtype = req->id2.idtype; res->direction = IDMAP_DIRECTION_UNDEF; if (req->id2.idmap_id_u.sid.prefix != NULL) { /* sanitize sidprefix */ free(req->id2.idmap_id_u.sid.prefix); req->id2.idmap_id_u.sid.prefix = NULL; } /* Find pid */ if (req->id1.idmap_id_u.uid == SENTINEL_PID) { if (req->id1name == NULL) { retcode = IDMAP_ERR_ARG; goto out; } if (ns_lookup_byname(req->id1name, NULL, &req->id1) != IDMAP_SUCCESS) { retcode = IDMAP_ERR_NOMAPPING; goto out; } } /* Lookup in well-known SIDs table */ retcode = lookup_wksids_pid2sid(req, res, is_user); if (retcode != IDMAP_ERR_NOTFOUND) goto out; /* Lookup in cache */ retcode = lookup_cache_pid2sid(state->cache, req, res, is_user); if (retcode != IDMAP_ERR_NOTFOUND) goto out; /* Ephemeral ids cannot be allocated during pid2sid */ if (IS_EPHEMERAL(req->id1.idmap_id_u.uid)) { retcode = IDMAP_ERR_NOMAPPING; goto out; } if (DO_NOT_ALLOC_NEW_ID_MAPPING(req)) { retcode = IDMAP_ERR_NONE_GENERATED; goto out; } if (AVOID_NAMESERVICE(req)) { gen_localsid_on_err = TRUE; retcode = IDMAP_ERR_NOMAPPING; goto out; } /* Set flags for the next stage */ if (state->directory_based_mapping == DIRECTORY_MAPPING_IDMU) { req->direction |= _IDMAP_F_LOOKUP_AD; state->ad_nqueries++; } else if (AD_MODE(req->id1.idtype, state)) { /* * If AD-based name mapping is enabled then the next stage * will need to lookup AD using unixname to get the * corresponding winname. */ if (req->id1name == NULL) { /* Get unixname if only pid is given. */ retcode = ns_lookup_bypid(req->id1.idmap_id_u.uid, is_user, &req->id1name); if (retcode != IDMAP_SUCCESS) { gen_localsid_on_err = TRUE; goto out; } } req->direction |= _IDMAP_F_LOOKUP_AD; state->ad_nqueries++; } else if (NLDAP_OR_MIXED_MODE(req->id1.idtype, state)) { /* * If native LDAP or mixed mode is enabled for name mapping * then the next stage will need to lookup native LDAP using * unixname/pid to get the corresponding winname. */ req->direction |= _IDMAP_F_LOOKUP_NLDAP; state->nldap_nqueries++; } /* * Failed to find non-expired entry in cache. Set the flag to * indicate that we are not done yet. */ state->pid2sid_done = FALSE; req->direction |= _IDMAP_F_NOTDONE; retcode = IDMAP_SUCCESS; out: res->retcode = idmap_stat4prot(retcode); if (ARE_WE_DONE(req->direction) && res->retcode != IDMAP_SUCCESS) if (gen_localsid_on_err == TRUE) (void) generate_localsid(req, res, is_user, TRUE); return (retcode); } idmap_retcode pid2sid_second_pass(lookup_state_t *state, idmap_mapping *req, idmap_id_res *res, int is_user) { bool_t gen_localsid_on_err = TRUE; idmap_retcode retcode = IDMAP_SUCCESS; /* Check if second pass is needed */ if (ARE_WE_DONE(req->direction)) return (res->retcode); /* Get status from previous pass */ retcode = res->retcode; if (retcode != IDMAP_SUCCESS) goto out; /* * If directory-based name mapping is enabled then the winname * may already have been retrieved from the AD object (AD-mode) * or from native LDAP object (nldap-mode or mixed-mode). * Note that if we have winname but no SID then it's an error * because this implies that the Native LDAP entry contains * winname which does not exist and it's better that we return * an error instead of doing rule-based mapping so that the user * can detect the issue and take appropriate action. */ if (req->id2name != NULL) { /* Return notfound if we've winname but no SID. */ if (res->id.idmap_id_u.sid.prefix == NULL) { retcode = IDMAP_ERR_NOTFOUND; goto out; } if (state->directory_based_mapping == DIRECTORY_MAPPING_IDMU) res->direction = IDMAP_DIRECTION_BI; else if (AD_MODE(req->id1.idtype, state)) res->direction = IDMAP_DIRECTION_BI; else if (NLDAP_MODE(req->id1.idtype, state)) res->direction = IDMAP_DIRECTION_BI; else if (MIXED_MODE(req->id1.idtype, state)) res->direction = IDMAP_DIRECTION_W2U; goto out; } else if (res->id.idmap_id_u.sid.prefix != NULL) { /* * We've SID but no winname. This is fine because * the caller may have only requested SID. */ goto out; } /* Free any mapping info from Directory based mapping */ if (res->info.how.map_type != IDMAP_MAP_TYPE_UNKNOWN) idmap_info_free(&res->info); if (req->id1name == NULL) { /* Get unixname from name service */ retcode = ns_lookup_bypid(req->id1.idmap_id_u.uid, is_user, &req->id1name); if (retcode != IDMAP_SUCCESS) goto out; } else if (req->id1.idmap_id_u.uid == SENTINEL_PID) { /* Get pid from name service */ retcode = ns_lookup_byname(req->id1name, NULL, &req->id1); if (retcode != IDMAP_SUCCESS) { gen_localsid_on_err = FALSE; goto out; } } /* Use unixname to evaluate local name-based mapping rules */ retcode = name_based_mapping_pid2sid(state, req->id1name, is_user, req, res); if (retcode == IDMAP_ERR_NOTFOUND) { retcode = generate_localsid(req, res, is_user, FALSE); gen_localsid_on_err = FALSE; } out: res->retcode = idmap_stat4prot(retcode); if (res->retcode != IDMAP_SUCCESS) { req->direction = _IDMAP_F_DONE; free(req->id2name); req->id2name = NULL; free(req->id2domain); req->id2domain = NULL; if (gen_localsid_on_err == TRUE) (void) generate_localsid(req, res, is_user, TRUE); else res->id.idtype = is_user ? IDMAP_USID : IDMAP_GSID; } if (!ARE_WE_DONE(req->direction)) state->pid2sid_done = FALSE; return (retcode); }