IL
(apply dissoc m ks)Size: a a a
2021 February 02
AS
(apply dissoc m ks)👍
DL
всем спасибо,
выглядит более-менее
(juxt (partial apply dissoc)
select-keys)
выглядит более-менее
DL
но обидно, что два прохода всё равно будет
KC
можно через reduce
(defn split-map [m ks]
(reduce
(fn [[m1 m2] k]
[(assoc m1 k (get m k))
(dissoc m2 k)])
[{} m]
ks))
IL
Ну, ключей в мапке, наверное не так много будет, чтобы об этом беспокоиться... Хотя, конечно, от задачи зависит
ST
Вообще, конечно, интересно, что это за задача такая, что нужно расщепить мапу на две именно таким образом
DL
Вообще, конечно, интересно, что это за задача такая, что нужно расщепить мапу на две именно таким образом
вообще неоднократно уже сталкиваюсь с подобной проблемой: например, есть какой-то условно-плоский кусок данных, из которых что-то надо выдать наружу, а что-то ни в коем разе нельзя, но использовать при этом надо (типа креденшлов, например).
DL
как креденшлы оказались в одной структуре с полезными данными? да например те же внутренности clj-http посмотри
ap
Случаем деструкцией такое сделать нельзя?
DL
andei papkov
Случаем деструкцией такое сделать нельзя?
конечно можно, так и делаю, пока не приходится деструктурить по десятку параметров
IG
вообще неоднократно уже сталкиваюсь с подобной проблемой: например, есть какой-то условно-плоский кусок данных, из которых что-то надо выдать наружу, а что-то ни в коем разе нельзя, но использовать при этом надо (типа креденшлов, например).
у нас сделано так: секретные данные врапятся в особый объект, у которого toString и протокол печати выводить <secret>
ST
вообще неоднократно уже сталкиваюсь с подобной проблемой: например, есть какой-то условно-плоский кусок данных, из которых что-то надо выдать наружу, а что-то ни в коем разе нельзя, но использовать при этом надо (типа креденшлов, например).
ну, это select-keys для выдачи наружу и использовать весь набор данных внутренне
зачем отделять данные, не вошедшие в select-keys?
зачем отделять данные, не вошедшие в select-keys?
IG
и обвязка через walk, которая пробегает по дереву и делает unmask для секретов перед передачей их куда-то. Если даже мапа уйдет в лог, секретов видно не будет
DL
у нас сделано так: секретные данные врапятся в особый объект, у которого toString и протокол печати выводить <secret>
они не обязательно секретные, они могут быть просто "лишние", но нужные до поры до времени
DL
ну или просто есть структура, которую нужно разделить на две, потому что оно лежит уже в готовом виде, но смерженное
DL
это решение почти в лоб, да, но очень уж напрягает делать всё не в один проход и конвертить туда-сюда
DL
о, а ещё на core.unify такое наверное достаточно просто сделать, но оверхед
DF
или через group-by
(defn split-map
[m keys]
(->> m
(group-by #(if (contains? (set keys) (first %)) :true :false))
((juxt :true :false))
(mapv #(into {} %))))
DF
остановите меня!