1 /* Code for loading BSD executables. Mostly linux kernel code. */
13 #define TARGET_NGROUPS 32
15 /* ??? This should really be somewhere else. */
16 abi_long memcpy_to_target(abi_ulong dest, const void *src,
21 host_ptr = lock_user(VERIFY_WRITE, dest, len, 0);
23 return -TARGET_EFAULT;
24 memcpy(host_ptr, src, len);
25 unlock_user(host_ptr, dest, 1);
29 static int in_group_p(gid_t g)
31 /* return TRUE if we're in the specified group, FALSE otherwise */
34 gid_t grouplist[TARGET_NGROUPS];
36 ngroup = getgroups(TARGET_NGROUPS, grouplist);
37 for(i = 0; i < ngroup; i++) {
38 if(grouplist[i] == g) {
45 static int count(char ** vec)
49 for(i = 0; *vec; i++) {
56 static int prepare_binprm(struct linux_binprm *bprm)
60 int retval, id_change;
62 if(fstat(bprm->fd, &st) < 0) {
67 if(!S_ISREG(mode)) { /* Must be regular file */
70 if(!(mode & 0111)) { /* Must have at least one execute bit set */
74 bprm->e_uid = geteuid();
75 bprm->e_gid = getegid();
80 bprm->e_uid = st.st_uid;
81 if(bprm->e_uid != geteuid()) {
88 * If setgid is set but no group execute bit then this
89 * is a candidate for mandatory locking, not a setgid
92 if ((mode & (S_ISGID | S_IXGRP)) == (S_ISGID | S_IXGRP)) {
93 bprm->e_gid = st.st_gid;
94 if (!in_group_p(bprm->e_gid)) {
99 memset(bprm->buf, 0, sizeof(bprm->buf));
100 retval = lseek(bprm->fd, 0L, SEEK_SET);
102 retval = read(bprm->fd, bprm->buf, 128);
105 perror("prepare_binprm");
107 /* return(-errno); */
114 /* Construct the envp and argv tables on the target stack. */
115 abi_ulong loader_build_argptr(int envc, int argc, abi_ulong sp,
116 abi_ulong stringp, int push_ptr)
118 int n = sizeof(abi_ulong);
122 sp -= (envc + 1) * n;
124 sp -= (argc + 1) * n;
127 /* FIXME - handle put_user() failures */
129 put_user_ual(envp, sp);
131 put_user_ual(argv, sp);
134 /* FIXME - handle put_user() failures */
135 put_user_ual(argc, sp);
138 /* FIXME - handle put_user() failures */
139 put_user_ual(stringp, argv);
141 stringp += target_strlen(stringp) + 1;
143 /* FIXME - handle put_user() failures */
144 put_user_ual(0, argv);
146 /* FIXME - handle put_user() failures */
147 put_user_ual(stringp, envp);
149 stringp += target_strlen(stringp) + 1;
151 /* FIXME - handle put_user() failures */
152 put_user_ual(0, envp);
157 int loader_exec(const char * filename, char ** argv, char ** envp,
158 struct target_pt_regs * regs, struct image_info *infop)
160 struct linux_binprm bprm;
164 bprm.p = TARGET_PAGE_SIZE*MAX_ARG_PAGES-sizeof(unsigned int);
165 for (i=0 ; i<MAX_ARG_PAGES ; i++) /* clear page-table */
167 retval = open(filename, O_RDONLY);
171 bprm.filename = (char *)filename;
172 bprm.argc = count(argv);
174 bprm.envc = count(envp);
177 retval = prepare_binprm(&bprm);
180 if (bprm.buf[0] == 0x7f
181 && bprm.buf[1] == 'E'
182 && bprm.buf[2] == 'L'
183 && bprm.buf[3] == 'F') {
184 retval = load_elf_binary(&bprm,regs,infop);
186 fprintf(stderr, "Unknown binary format\n");
192 /* success. Initialize important registers */
193 do_init_thread(regs, infop);
197 /* Something went wrong, return the inode and free the argument pages*/
198 for (i=0 ; i<MAX_ARG_PAGES ; i++) {